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With BUSINESSPAK+ the Model 100 GRAPH+: Prints out Bar, Line and 


is virtually a complete tool for the 
manager or executive. Picture how 
this added capability will help you. 

WRITE+: Instead of merely a text 
preparation device the Model 100 
becomes a real word processor. 
Margins . . . side, top and bottom. 
Title page, topic headings, page 
numbers, and even headers and 
footers. You can even right justify 
and print multiple copies. It has 
over 36 features and countless 
format possibilities. 

EXPNS+: By simply entering 
expenses into eighteen categories, 
you get a twelve day spreadsheet, 
giving totals for each day, and 
category. Names of rows and 
columns are instantly changeable, 
and the sheet becomes a budget 
or even a financial report. Replica- 
tion across the columns, emulative 
totals, and automatic growth or 
decline rate projection, make 
EXPNS+ an excellent planning tool. 
And, all the math is built right in. 


Pie graphs of any EXPNS+ report 
on the DMP-100 dot matrix printer. 
Shows the percents on the pie chart 
and values on the others. 

TELEX4*: From any phone send any 
text file to any Telex machine in the 
world. Just enter the receiving 
Telex number. Send Mailgrams for 
next day delivery to any address 
at reduced rates through the 
Action Telex system. 

PUT+: Lets you list any informa- 
tion in an organized fashion. It 
prompts for each entry and very 
rapidly creates addresses or schedule 
items and even inventory. 

SORT+: Allows you to sort any 
list you compile with PUT+ alphabet- 
ically or numerically from any 
category in the entry. It can sort 
large files up to 20 times faster than 
an all Basic program. 


MASTERCARD/ VIS A/COD 




PCSG provides hotline software 
support for the Model 100. Give us 
a call at 1-214-351-0564. 


TRS-80 is a trademark of 
Tandy Radio Shack, Inc. 

1983 Portable Computer Support Group 


RDRTABLE GOMRIJTER UFFORT ORQJP 

11 035 Harry Hines Blvd. No. 207, Dallas, Tx. 75229 



From Computer Plus to YOU . . . 

PLUS after PLUS after PLUS 



Rl IV OIDE^T Here are > ust a few of our f ine offers . . 

I call TOLL FREE for full information. 


COMPUTERS 


R.S. Modem 1 D.C. 

129 

DISK DRIVES 


Model 12 64K1 Drive 

$2699 

R.S. Modem II D.C. 

199 

R.S. Model IV IST-Drive 

515 

Model 12 64K 2 Drive 

3375 

R.S. DC-1200 

565 

Tandon40TrackMI 

289 

Model IV 16K 

849 

PRINTERS 


Color Computer Drive 1 

299 

Model IV64K 


Daisy Wheel II 

1715 

Color Computer Drive 0 

470 

2 Disk & RS232 c 

1699 

DWP-410 

1320 

Primary Hard Disk Mil 

3099 

Color Computer 16K 

175 

Silver Reed EXP550D.W. 

679 

Primary Hard Disk Mill 

2199 

Color Computer 16K 


Smith Corona TPI Daisy Wheel 

495 

ETC. 


w/extended basic 

255 

Epson 

Call 

CCR-81 recorder 

52 

tColor Computer 32K 


CGP-115 

199 

C. C Joysticks 

22 

w/extended basic 

345 

DMP-100 

315 

16K RAM Chips 

25 

Pocket Computer 2 

165 

DMP-120 

410 

64K RAM Chips 

75 

Model 16 1DR 128K 

4199 

DM P-200 

599 

32K Microbuffer Inline 

229 

Model 162DR128K 

4799 

DMP-400 

1010 

SOFTWARE 


Model 100 8K 

679 

DM P-500 

1539 

Brand Name Software • 


Model 100 24K 

835 

DMP-2100 

1779 

Send for listing. 


MODEMS 


Okidata 82A 

399 

R.S. Software 10% off list 


Lynx Direct Connect MI/MIII 

235 

Okidata 83A 

655 

Coco FHL Flex D.O.S. 

69.95 

Hayes Smart Modem II 

235 

Okidata 84 Parallel 

999 

Parallel Printer Cables are 


Hayes Smart Modem 1200 

565 

Okidata 92 

510 

available for most computers. 


Novation Smartcat 1200 

459 

Okidata 93 

859 

tColor Computer 64K reauires 

Novation J-CAT 

125 

Gemini 10 

319 

Disk 0 and D.O.S. 


R.S. Acoustic Coupler AC-3 

129 

Prowriter 

375 

TOLL FREE 




We have the lowest possible 
Fully Warranteed Prices AND 
a full complement of Radio Shack 
Software. 


Prices subject to change without notice. 
Not responsible for typographical errors. 
TRS-80 is a registered trademark of Tandy Corp. 


1 - 800 - 343-8124 




P.O. Box 926 
480 King Street 
Littleton, M A 01460 
617-486-3193 
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Lprint 

Wonders 
of East 
And West, 

or 
Sheik 
it 
up, 

Baby 



One of the things which I consider to 
be among the most fantastic about the 
Portable Computer is its ability to carry 
programs with it in its own memory. 
This, I believe, is a true advance in the 
world of computing. And, with the 
built-in programs in the Model 100, 1 
believe what we are pleased to hold in 
our hands is one of the best applications 
of computers today. 

Well, the truth is that 1 just don’t get 
out of the office very much. And there is 
no question that the Portable Computer 
— while it certainly shines in the office 
environment — is without peer on the 
road. (Could that be why we have a 
column with that name?) So, a couple 
of weeks ago when I was finally dragged 
off for some restful vacation, 1 decided 
it would be a great opportunity to “field 
test” the Portable Computer in some 
far-reaching fields. 

I will not try to tell you that the better 
half of my family thought it was totally 
peachy-keen to have a computer going 
along on a vacation. There was some 
mention of needing to “get away from 
those things for just two weeks.” But 
what an opportunity. 


So, as you will see on this page, I am 
also indulging myself in showing you a 
“vacation” picture. Yes, that’s me, at the 
bottom of the pyramid of Cheops. And, 
yes, that’s my trusty Portable Compu- 
ter. We were working a little program to 
figure the height of equilateral triangles 
using the pyramid. 

As for the hat: It is hot at the pyram- 
ids, of course. A friendly camel-driver 
lent me his sun-bonnet. 

Should 1 digress. Perhaps so. 

If you will accept the given that my 
Portable Computer was going on vaca- 
tion with me, then the only question is 
why. And the answer is pretty simple. 
Or, perhaps, the answers. 

To get to said pictured pyramid, we 
had to take a plane, a boat, a bus and, 
finally (I kid you not)a camel. No, I did 
not have to take the camel, but who 
could miss a chance like that! 

There is no electricity on the plane, 
the boat had European current only, the 
bus didn’t have any sort of electricity 
and the camel, well . . . How is a serious 
computerist going to solve all these 
problems? 

Answer: Batteries and the Portable 


Computer. 

1 loaded up a few games from Silver- 
ware Software into my Portable, stashed 
it in a tote bag along with a lot of other 
stuff we didn’t want to chance the air- 
lines with, and headed out for New 
York and, hence, Athens. A royal send- 
off in New York was arranged by Bob 
Rosen of Spectrum Projects. 

I played Reversi from New York to 
Athens. The flight was nine hours. The 
Portable Computer won a lot more 
often than did I. Transferred (as they 
say in the travel business) from the air- 
port to the T.S.S. Stella Solaris , 1 
thought I was seeing double. Someone 
else aboard, a fine gentleman named 
Angus German of Costa Mesa, Calif., 
also had a Portable under his arm. My 
wife winced. So did his. But we played it 
cool and didn’t devote too much time to 
computing (you’ll see some of his pro- 
grams in future issues). 

Oh, yes, the pyramids. Two days out 
of Athens we hit Port Said, Egypt. 
Trusty Portable Computer and 1 loaded 
ourselves onto a bus for a three-and-a- 
half-hour ride to Cairo and, hence, the 
pyramids. Near them, I boarded a camel 
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named — I was told “Yankee Doodle 
Dandy’' (although I expect the name 
changes with the nationality of the tour- 
ist). Anyhow, “Yankee Doodle Dandy,” 
the Portable Computer and 1 soon 
arrived at the pyramids. 

1 sat down and started computing, 
working a simple program 1 was taught 
in high school geometry. The purpose 
wasn’t to really do anything at this point 
so much as “test” the portability of the 
Portable. 

Some camel driver loaned me his hat 
— the sun was hot. Wife Willo snapped 
the photograph. And the Portable Com- 
puter? With all the banging, dirt, dust 
and heat, it performed beautifully. 

I’m sure this whole story, with which 
you are no doubt bored by now, does 
illustrate a point quite well. And that is 
that the Portable Computer is truly por- 
table. Whether it is in your car, on a 
boat, or on a camel — it will go where 
you need it to and perform as you want 
it to. 

More important, it is all you need. 
Because I was able to load my little 
geometry program into memory in the 
cool confines of my home here in Pros- 
pect, Ky., before ever venturing out, 
there was absolutely no need to take 
anything else along. I had the material 1 
needed “on site,” as they say. 

And that, 1 think, says worlds for the 
Portable Computer. 

On a more mundane subject, we are 
very gratified here by the acceptance of 
PCM— The Portable Computing Magazine. 
Many of you have been kind enough to 
write us to say how much you have 
enjoyed the first two issues and that you 
are looking forward to seeing more of 
them. 

Well, naturally, more will be coming 
in future issues. And, shortly, more will 
be coming in each issue. 

The reason for this is that the eco- 
nomics of the magazine business are 
such that we try to run about half of the 
magazine with editorial material and 
the other half with advertising. Thus, as 
our advertising grows, so will PCM. We 
hope that, within the next several months, 
PCM will double in size. 

You can help us do that. The old 
request to “Please Patronize Our Ad- 
vertisers” may seem trite, but it does 
help us a lot. And the word spreads 
among advertisers. So, please do patron- 
ize those firms which advertise in PCM , 
and, too, please let them know where 
you saw their advertisments. It can only 
help, both of us by allowing us to pro- 
vide a bigger and better magazine. 

— Lonnie Falk 


Editor: 

Let me congratulate you on a superb pub- 
lication, PCM, the Portable Computing 
Magazine. I have ordered, received and am 
using the BUSINESSPAK+ by Portable 
Computer Support Group. This letter was 
generated by their WRITE+ program. Their 
manual is easy to read, understand and use. 

I have ordered Quick Plot from Solutions 
Computer Company, but have not received 
the program. As soon as 1 get some usage, I 'll 
let you know the results. 

Applause and a bouquet of roses to Robert 
Frowenfeld for his clear, precise article Plot- 
ting Graphs with the Model 100. The pro- 
gram works very, very well. 

I personally thank you for your publica- 
tion, Mr. Robert Frowenfeld for his excel- 
lent article (I hope he contributes informa- 
tive articles that we, the novices, can use) 
and the Portable Computer Support Group 
for their friendliness, consideration, and 
easy-to-use software. 

1 am anxiously awaiting the August issue. 

Darran N. Huggins, M.D. 

Ashland, OH 

Editor: 

PCM promises to be as great as the Rain- 
bow! Congratulations on a fine first issue. 
My copy arrived the day before I got my 
PoCo. 

Since my “mainframe” is a CoCo, Fd like 
to see the problem of transferring files from 
PoCo to CoCo addressed. My files refuse to 
transfer via cassette. Of course, 1 can tele- 
phone them from one to the other, but I'd 
like to see cassette files load directly into 
CoCo. 

Also, I hope someone comes up soon with 
a box that will enable me to use my Epson 
MX-80 without going into it each time to 
remove the serial-to-parallel card from the 
printer. 

It isn’t often that I can argue with the 
experts, but contrary to what Bob Rosen 
says (page 13) 1 have no trouble flipping 
from page to page in text mode. All it takes is 
two SHIFT-up arrows or SHIFT-down ar- 
rows on my 24K machine. 

I hope Melvin Hefter puts his great exper- 
tise to work on some programs for PoCo. 
His programs for CoCo are among the most 
useful I have. 

Max C. Shank 
Chicago, IL 

Editor: 

I purchased a TRS-80 Model 100 Porta- 
ble Computer specifically to use as a termi- 
nal device from my office during the day and 
still be able to carry it home at night after 
work. I happen to work in a public institu- 
tion and cannot leave an expensive terminal 
unattended. I also own an Apple computer 
which I have had for years and I use it at 
home. The Apple has a serial card installed 
and 1 have been able to transfer material 
back and forth between the two computers 
using the Telecom at one end and ASCII 
Express Professional at the Apple end very 
easily. I use this method for bulk storage of 


my PoCo data onto Apple floppy disks 
rather than store stuff on the cassette record- 
er. 1 am transferring at 4800 Baud rate which 
is much faster than cassette, plus I gain the 
advantage of having a directory on the disk. 
In fact, one of my major objections to using 
a cassette for program storage is the lack of a 
directory. It is almost necessary to use a 
separate cassette tape for each program. I 
can't wait until the Shack announces a better 
bulk storage system for their excellent Po- 
Co. 

Larry Boulet 
Warren, MI 

Editor: 

Your “Lprint” (page 5) asks for mail re- 
sponses, etc. I think the name PorCo would 
be a better name than PoCo. There is CoCo 
that is in use and it could be confused with 
that name. Also, the Spanish connotation of 
words such as poco loco would detract from 
the significant seriousness of the name. 

One of the most important things that 
your magazine can do would be to develop a 
translation formula between Microsoft 
(which I believe is the Model 100 language) 
and the BASIC language used by IBM and 
other PCs. 

I am a CPA and don’t at all understand 
the creating of a program but I am self 
taught enough to be able to load it into the 
100. In fact, I did it with the Biosin program 
and obtained great results. By the way, was 
there a typographical error on page 12, line 
1470 of the program in the word “rere- 
garded”? Should the word be “regarded?” 
The word of course does not affect the utili- 
zation of the program. In fact, before typing 
this letter I ran the program on myself to see 
if I was capable in a “physical, emotional 
and intellectual” way. I was, so I typed this 
letter. 

1 read all of the articles twice and all of the 
advertisements four times, and have already 
ordered some of the products offered. It is 
unfortunate that Radio Shack does not yet 
have any software in print or in cassette. 

My biggest need is to attain the ability of 
inputting data into the 100 that could be 
uploaded into an IBM, for example, that 
would fit into an existing IBM program 
without having to be entered via the IBM 
keyboard. 1 sincerely hope that IBM will 
have this in mind when it introduces its 
“Peanut” model. 

The other thing th’.t puzzles me is the fact 
that Radio Shack has a computer that 
weighs less than four pounds but uses a 
computer cassette recorder (CCR-81) that 
weighs almost as much. Epson uses a built-in 
micro recorder. I think every Model 100 
owner would happily buy a micro recorder if 
it weighed less than a pound or so. 

Thanks again for having such an excellent 
publication. Lots of luck to you. 

By the way, how about the name Micro- 
Portl Or, if it has to be, Porto- Micro! 

In any event, what you have done for the 
industry and many lives, is worth any name. 

Rubin L. Gorewitz 
New York, NY 
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Ask your dealer for the Porta™ series 
from Skyline — to help you work faster and better! 

PortaCalc™ — Model 100 “electronic spreadsheet” with 14 column by 26 row workspace! 
Full use of the built-in function keys to save, load, screen print, report print, or to look 
behind the data at the formulas in use. 

Full arithmetic operators including exponentiation, absolute value, integer, summation, 
and averaging. Calculations are done to 14 digits of precision and displayed up to 9 
digits. User selectable decimal place from none through seven— not just one, two, or 
floating! Formula replication is included to allow fast creation of worksheets. 

Worksheets may be saved, loaded, or merged using the computer’s memory or 
cassette. Often used templates can be saved in memory for instant recall. 

Two powerful utility programs are included with PortaCalc at no extra 
charge! PortaDex™ is a data exchange program that allows reformatting 
PortaCalc files into the DIF format used by VisiCalc. PortaPrint™ is an 
enhancement to the Model 100’s text editor, adding the ability to adjust 
left, right, and top margins, and page length. Page numbering, headers, 
centered lines, flush right justification, new page control, and more. 

Comes with extensive documentation in padded 3-ring binder. Includes 
tutorial, detailed reference section, and executive level sample templates. 

Fully illustrated with screen prints, examples, and hints. 

PortaStat™ — Correlation, regression analysis, and descriptive statistics 
package, designed to be a working tool for today’s businessman. 

Data can be input from cassette, memory, or keyboard. Interactive with 
PortaCalc data files! Thoroughly documented, includes tutorial. 

PortaFin™ —Present value, net present value, future value, annuities, 
interest factors, loan constants, internal rate of return and more! This user- 
friendly package prompts you for the needed input data, then gives you 
the answer to your loan or investment problem! Interactive with PortaCalc 
files, allowing you to “read” cash flow data from memory. Keyboard or 
cassette input also available. 

PortaMax M — The powerful ‘simplex’ method of linear programming. Find 
the optimum ‘mix’ for a given set of constraints. Interacts with PortaCalc 
files to avoid time-wasting repetitive data entry. Tutorial, examples, and 
bibliography included. 

P ortaFolio M — Stock and bond valuation, betas, Macaulay’s duration, yield 
to maturity, bond swap calculations, and much more. All in an easy to use 
program, interactive with PortaCalc data files. Supplied with comprehensive 
instructions and reference manual. 


All Porta series programs are supplied on cassette and require 24K RAM. 
Pricing — PortaCalc is $69.95, all others are $44.95 each. 

If ordering direct, add $2.00 shipping and handling per order. 



4510 W. Irving Park Rd. • Chicago, IL 60641 • (312) 286-0762 
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42 
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D 

8 
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44 
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D# 
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45 
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57 
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E 

10 
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22 
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34 

1864 

46 

932 

58 

466 

F 

11 

7032 

23 

3516 

35 

1758 

47 

879 

58 

439 

F# 

12 

6642 

24 

3321 

36 

1660 

48 

830 

60 

415 


told BASIC that all variable names (A — 
Z) will be integers. Line 6 sets the varia- 
ble “N”to 59; this is the total number of 
notes in the song. Line 7 is a DIMension 
statement which sets up arrays for the 
notes to play (“N$”), the duration of 
each note (“L”), and the words to be 
displayed as the song is playing (“WD 
$”). 

Lines 10-13 are DATA statements 
that contain the notes ( A,B,C, etc.) and 
the duration, and lines 20-27 are DAT A 
statements that contain the words of the 
song. For you neophytes to the world of 
music, the musical scale consists of the 
letters “A” through “G.” A small prob- 
lem here: how do we play a song with 
eight notes using the seven letters A,B,C, 
D,E,F,G? Well don’t worry, line 29 
holds the clue . . . we’ll just call the last 
letter “H.”The song actually starts with 
the note “C,” and continues through the 
scale C-D-E-F-G-A-B-C, but we will 
give the second “C,” usually called high 
“C,” the designation “H.” The DATA 
statement in line 30 contains the values 
outlined in the Model 100 user’s manual 
for generating the various notes. The 
numbers (for this song) start at 2348 and 
progress downward as the notes get 
higher in pitch. The last note has a value 
of 1 174, exactly half of the first note’s 
value of 2348. In music, the frequency of 
a note is exactly double (or half if you’re 
going the opposite direction) of the 
same note in an adjacent octave. Using 
this scheme, this would mean that the 
next “C” note would have a value for 
generating sound on the Model 100 or 


1174/2, or 587, and a look in the 
owner’s manual shows that this is exact- 
ly the value of the next highest “C” note! 

Line 40 reads in the values from the 
DATA statements for the notes and 
durations, and line 45 reads the words 
into the word array. Now we’re ready to 
play some music! 

Line 50 reads in a string “TN$” which 
will be used to determine the note to be 
played. The array “FR” is also read in 
here; this is the list of pitch values 
referred to in line 30. 

Remember the sound command? 
Line 60 is the beginning of a FOR- 
NEXT loop which plays each note. But 
it sure does look a lot more complicated 
than the SOUND pitch, length format 
originally described. Well, that’s be- 
cause we want this to work quickly and 
smoothly, and not get bogged down in 
loops searching for notes and values. 
The beauty of this routine, as you will 
see, is that it takes virtually no time to 
determine the note to play. But, more 
importantly, it takes the same amount 
of time to compute which note to play, 
and that’s the secret to keeping the 
tempo smooth and rhythmic. 

The 1NSTR function imbedded in the 
SOUND instruction is used here to 
determine the numeric value for the 
pitch portion of the SOUND command. 
This function searches the string “TN$” 
which is the “CDEFGABH” already 
described, and looks for the value in the 
note array “N$.” It uses the result of this 
function, which is a value in the range 
t — 8 as a pointer to the pitch array 


“FR.” For example, the second note 
played is a “D.” INSTR(TN$,“D”) will 
return a value of 2, and FR(2) is the 
value 2092 which will be sent to the 
sound generator to play the note “D.” 

Now for the duration. The value read 
in for the length of time each note is to 
be played ranges from one to eight. In 
line 60 the length for each note is multi- 
plied by 1 2, resulting in the actual play- 
ing time for each note to vary from 1 2 to 
96 (12 x 8). Remember I said that a 
value of 50 equals approximately Vi 
second? I’ve found that using a value of 
12 for one “beat” of music turns out to 
be a good value; it makes the song move 
along at an easy-to-listen-to pace. 

You may have noticed the PRINT 
statement in line 60 that is executed just 
before each note is played. This prints 
the element of the “WDS” array to the 
screen. These “elements” are the words 
to the song DO RE Ml. 

Once the song is finished, the GOTO 
55 statement in line 70 simply clears the 
screen and starts the song playing over. 

While 1 am not a musician by any 
means, 1 have been able to take some 
simple pieces of music (like this one) 
and transfer the notes to my PoCo to 
give me some soothing moments while 1 
contemplate the world’s more profound 
problems. In order to do this. I’ve deve- 
loped a method to facilitate the trans- 
ferral of sheet music to a numerical 
format. 

Using the chart that is found in the 
Model 100’s manual under the SOUND 
command, I have numbered each note. 
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starting at “1” for the “G” in the lowest 
octave with a pitch of 12538 and ending 
at “60” with the B-sharp in the highest 
octave with a pitch of 415 (see Figure 
#1). Next, 1 take a piece of sheet music 
and number each note with the match- 
ing value in the table (see Figure #2). 
The result is a series of numbers which 
represents the pitch values to be used in 
the SOUND command. The only re- 
maining task is to also assign a duration 
to each note. A simple method (but by 
no means the only one) to incorporate 
the length of each tone into the pitch 
value is to change the pitch value. Since 
there are 60 notes in the five octaves in 
Figure #1, no coded pitch value will be 
higher than 99. Let’s say, for the mo- 
ment that we will use only whole beats 
in our music scheme. To make the tone 
last two beats, I simply add 100 to the 
coded value; for three beats I add 


another 100, and so on. For example, 
take the “C” note in the second octave. 
For a single beat it would be coded as 


Figure 

: 2: 
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18, for 2 beats it would be 118, and to 
hold the tone for a full bar of four beats, 
the value would be coded as 318. 
Armed with this novel (yet far from 


revolutionary) idea, I have proceeded to 
code the numeric values for the song 
Music Box Dancer by Frank Mills. 
Using the TEXT program built into the 
Model 100, 1 created the document file 
named BOXDAN.DO that appears in 
Listing #3. This text file became the data 
file for the program in Listing #2 which 
reads the data file and plays the music. 
Y ou will notice that all notes, except for 
the very last one, are one beat in length. 

Once the data is typed into the text 
file, 1 just run the program in Listing #2 
and enjoy a few moments of melodic 
relaxation. I would like to take this 
opportunity to encourage you Model 
100 owners to develop data for your 
favorite songs and send them in to us at 
PCM. We’ll be happy to select some of 
the nicest tunes and publish them in 
next month’s issue. Until then . . . play it 
again, Sam! 


Listing 1: 

Listing 2: 

5 DEFINT A-Z 

1 CLEAR 500 

6 N“59 

5 DEFINT A-Z 

7 DIM Nf <N) ,L(N> ,WD$(N) 

7 ON ERROR GOTO 200 

10 DATA C,3,D,1,E,3,C,1,E,2,C,2,E,4,D,3, 

10 DIM J<60> 

E, 1 f F t 1 ,F, 1 ,E, 1 ,D, 1 ,F,8 

100 DATA 12538,11836,11172,10544,9952,93 

11 DATA E,3,F,l,G,3,E,l,8,2,E,2,e,4,F,3, 

94 , 8866 , 8368 , 7900 , 7456 , 7032 , 6642 

6t 1 i A, 1 ,A, 1 ,8, 1 ,F , 1 , A , 8 

110 F0RI*1T01 2: READJ ( I ) : NEXTI 

12 DATA G,3,C,1,D,1,E,1,F,1,G,1,A,8,A,3, 

120 F0RI*2T05:FQRJ*1T012:J((I-1)#12+J)*J 

Dil|E,l,F,l,B,l,A,l,B,8,B,3,E,l,F,l,6,l, 

< ( I -2 ) *12+J ) /2i NEXTJ i NEXTI 

Ail*8,l,H,7 

125 CLS 

13 DATA H,1,B,1,A,2,F,2,B,2,G,2,H,2,G,2, 

130 0PEN"B0XDAN"F0R INPUT AS 1 

E.2,D,2 

131 11*0 

20 DATA DO - , A , DEER ,A , FE , MALE , DEER. 

140 INPUT# 1 , I :K*IMOD100 

21 DATA RE - ,A ,DR0P ,0F ,G0L,DEN ,SUN. 

142 II-II+l 

22 DATA MI - ,A .NAME ,1 .CALL , MY, SELF. 

150 SOUND J (K) , 12* ( 1+INT (1/100)) 

23 DATA FA - ,A .LONG .LONG .WAY ,T0 ,RU 

160 6OTO140 

N. 

24 DATA SO - ,A .NEE.DLE , PUL, LING ,THRE 
AD. 

200 CLOSE: 60T01 30 

25 DATA LA - ,A .NOTE ,T0 .F0L.L0W ,S0. 

26 DATA TI - ,A .DRINK .WITH .JAM .AND , 

Listing 3: 

BREAD. 

6,10,13,10,18,13,10,13 

27 DATA THAT .WILL .BRING ,US .BACK ,T0 

6,10,13,10,18,13,10,13 

, DO , DO . DO , DO 

6,10,13,10,18,13,10,13 

29 DATA "CDEFGABH" 

6,10,13,10,18,13,10,13 

30 DATA 2348,2092,1864,1758,1567,1396,12 

18,13,18,22,18,22,25,22,30,29,27,25,6,10 

44,1174 

,13,18,25,23,20,17,13,17,20,23,22,18,27, 

40 F0RI“1T0N: READ NKI) , L ( I > I NEXT I 

25,10,13,18,13 

45 FORI* 1 TON: READWDI < I ) : NEXTI 

18,13,18,22,18,22,25,22,30,29,27,25,6,10 

50 READ TNfi FOR 1*1 T0LEN( TNI) l READ FR(I)i 

,13,18,25,23,20,17,13,17,20,23,18,13,22, 

NEXTI 

18,10,13,18,1 

55 CLS 

30,27,23,18,15,18,23,27,25,18,27,25 

60 FORI *1 TON: PRINTWDI ( I ) J : SOUND FR1INSTR 

6,10,13,18,25,23,20,17,13,17,20,23,22,18 

(TNI.NK I ) > ) ,L < I ) #12 

,27,25,10,13,18,13 

61 IFRIGHTKWDf (I) ,1)« M . "THENPRINT 

30,27,23,18,15,18,23,27,25,18,27,25 

65 NEXTI 

6,10,13,18,25,23,20,17,13,17,20,17,18,13 

70 G0T055 

,22,18,318 
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PRICKLY-PEAR SOFTWARE 

QUALITY PROGRAMS FOR YOUR MODEL 100 



Monsters & Magic 

The most realistic fantasy role-playing game yet for the 
ColorComputer. You start out by rolling upyourcharacter's 
basic ability scores and buying equipment. When you are 
ready it’s into the dungeon. Your character starts at first 
level, but can rise in levels by garnering experience in the 
fray. If you have role-played fantasy games you will be 
amazed at the realism of the combat system. Armor class, 
initiative, and damage by weapon type are all included, 
with over 50 different monsters to fight - each with it’s own 
abilities. As you rise in level you can win treasure and find 
magic weapons and spells - if you live!! You set the game 
length by telling how many monsters you want to fight 
before you reach your final battle to the death against the 
powerful Dungeon Lord. There are 1000+ place descrip- 
tion combinations in this text based game, and real excite- 
ment in every one! This is a fantasy simulation, and istruly 
not like any adventure game you have ever seen. For 1 
player. $19.95 tape— 24K 


Astrology 

Truly a classic, this program will accurately cast your 
complete horoscope. You just enter the date, time, and 
place of birth. The sun sign, rising sign, mid heaven (MC), 
lunar nodes, and planetary influences including houses 
and aspects between the planets will all be calculated, and 
a full chart drawn. You can also do progressed charts and 
transits. It will even tell you the day of the week you were 
born. The accompanying book will help you interpret this 
chart of your horoscope. The extent of the documentation 
is tremendous, even by our exceptionally high standards, 
and no previous knowledge of the subject is required. You 
can share in this wisdom which has been used for thou- 
sands of years in many cultures. This program was written 
by a professional Astrologer. $34.95 tape — 16K 



A simulation for 1 to 4 persons. Each begins as a land- 
owner, and by farming their land, buying and selling land, 
expanding their fishing fleet, building on to their manu- 
factory, increasing their population, equiping and training 
more soldiers, and regulating their taxes, each player tries 
to increase their economic power and rank until one 
becomes ruler over all. But beware plagues, rats, raiders, 
revolts, bad weather, and other misfortunes which may lie 
along the road to success. As you progress, see the map of 
your holdings increase. Playable in 1 to 2 hours, and 
different every time, you may have an addiction problem. 
$1 9.95 tape — 24K 



If you ever wanted to try a life of crime, this is your chance. 
You will start out as a Punk, but by using brains, and a little 
muscle, you can rise to become a Hood, Runner, Bookie, 
Torpedo, Fence, Kingpin, or win by becoming Syndicate 
Boss. Indulge yourself. Bribe a judge, or the District 
Attorney. Pay off the Cops. Take out a contract on another 
player, but watch out, they may be after you. Buy trucking 
companies, bootleg operations, houses of ill fame, but 
remember, if you get caught, yqu may do some hard time. 
Do you have what it takes to take over? This game will keep 
you close to your rod, get you thinking about bulletproof 
glass in your car, and definitely bring out the worst in you, 
but you’ll love every minute of it. For 2 to 6 players, takes 
about 2 hours to play. Every game is excitingly different. 
$19.95 tape — 24K 


Your personal check is welcome - no delay. Include 
$1.50 shipping for each program ordered. (Shipping free 
on $50.00 or larger orders). AZ residents add 7% sales 
tax. Orders shipped within two days. 


Stocked by Quality Dealers, or 

Send Order To: PRICKLY-PEAR SOFTWARE 

9234 E. 30th Street 
Tucson, Arizona 85710 
(602) 886-1505 
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By Thomas J. Flamer 


V ery often it is desirable to analyze 
data and to find a relationship 
between two variables and ex- 
press this relationship in mathematical 
form by determining an equation con- 
necting the variables. 

When the data is plotted on a rectan- 
gular coordinate system it is often pos- 
sible to visualize one or more smooth 
curves which approximate the data. In 
particular, if the data seem to be approx- 
imated by a straight line we say that 
there exists a linear relationship be- 
tween the two variables. 

The general problem of finding equa- 
tions of approximating curves which fit 
given sets of data is called curve fitting. 
In this article we restrict our discussion 
to linear curves. 

One of the main reasons for curve 
fitting is to estimate one of the variables 
from a given value of the other. This 


process of estimation is called regres- 
sion and when a straight line is used to 
fit the data it is called linear regression. 

The accompanying program deter- 
mines the best straight line that fits a set 
of data. The data may be entered manu- 
ally from the keyboard or serially from 
a data file. The program proceeds to 
calculate means, variances, covariances 
and standard errors of estimate which 
are displayed and subsequently used to 
perform a least-squares fit designed to 
minimize the sum of the squares of the 
deviations of the actual data points 
from the straight line of best fit. The 
equation of the best line along with the 
slope, Y-intercept, and errors are dis- 
played, and from there the user encoun- 
ters a menu which allows him to: 

1) Perform linear regression, which 
means that additional data points can 
be interpolated or extrapolated from 


the determined best line. The user can 
specify whether he would like to deter- 
mine X from a given Y or Y from a given 
X. 

2) Compare actual data to that esti- 
mated by the least-squares line. 

3) Plot the actual data on Cartesian 
coordinates as well as the best line 
which passes through them. Maximum 
and minimum values of X and Y are 
displayed. 

4) Review statistical results previously 
displayed. 

5) End the program 

Data files to be input should be in the 
form of X,Y pairs; the program deter- 
mines the number of data pairs in a data 
file and stores them in arrays dimen- 
sioned X(IOO), Y(100). 

The program was designed to be used 
on a Model 100 with 24K. 


The listing: 


5 ' #####*#######*#*##***#************* 

6 '*** LINEAR REGRESSION PROGRAM *** 

8 '*#* BY FLAMER [JUNE 10 f 1983] *** 

9 'I********************************** 
11 '# 

12 '* 

14 '*** VARIABLES *** 

16 ' N NUMBER OF POINTS 
18 ' X VALUE OF X 

20 ' Y VALUE OF Y 

22 ' XM MEAN OF X 

23 ' YM MEAN OF Y 

24 ' XD STANDARD DEVIATION OF X 

26 ' YD STANDARD DEVIATION OF Y 


28 ' C COVARIANCE OF X AND Y 

30 ' CC CORRELATION COEFFICIENT 

32 1 M SLOPE OF REGRESSION LINE 

34 1 B Y-INTERCEPT OF REGRESSION LINE 

36 1 SX SUM OF X-VALUES 

38 ' SY SUM OF Y-VALUES 

40 ' XX SUM OF SQUARED X-VALUES 

42 ' YC CALCULATED Y-VALUE 

45 H$»"X-ACTUAL Y-ACTUAL Y-CALCULATED M 

55 Nl$**' ######.####" * N2$ s 11 ####t i###" > N3$ 

= ”+####. ####“: N4*» ,, .#r' 

60 RV$«CHR* (27) + "p " 8 NM$*CHR$ <27) + "q M 
70 DEFINT I , J ,K,L 
85 0NERR0RG0T01 150 

90 DIMX (100) , Y(100) ,YC(100> 

91 CLSi PRINT" LINEAR REGRESSION PR 

QGRAM" sPRINTSTRINB$(39, ) J 
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92 PRINT* PRINT-THIS PROGRAM MILL PERFORM 
A STATISTICAL "j 

93 PRINT-ANALYSIS 

93 PRINT" OF YOUR DATA AND FIT THAT 
DATA "j 

96 PRINT" TO A LEAST-SQUARES LIN 

E "5 

98 GOSUB6400 

100 CLS 

110 PRINTRV* 

112 PRINT08, "LINEAR REGRESSION PROGRAM" 

113 PRINTNMS 

120 PRINT-DATA ENTRY BY KEYBOARD— < 1 >" 
140 PRINT 

160 PRINT"DATA ENTRY BY FILE <2>" 

180 PRINT 

220 INPUT"WHICH NUMBER "jRE 

225 IF (RE>2 ) OR ( RE< *0) THENBEEP I GOT 01 00 

240 ON RE GOSUB 1000,2000 

242 P=N 

243 P* I NT <P/2) 

244 IF <P=0) THEN260 

245 Q=N-P 

246 F0RJ-1T0Q 

247 I»J 

248 R“ I+P 

249 IF(X(1XX(R)> THEN257 

250 Tl-X < I ) * T2«Y ( I ) 

251 Xm»X<R>lY<I>«Y<R) 

252 X (R)=Tll Y (R)"T2 

253 I = I-P 

254 IF ( I >0) THEN248 

257 NEXT 

258 G0T0243 
260 FORI-1 TO N 
280 X«X ( I ) i XM“SX/N 
300 Y»Y <I)i YM-SY/N 
320 SX“SX + X j SY*SY+Y 
340 XY»XY+X#Y 

360 XX«XX+X#Xi YY«YY+Y#Y 
380 NEXT 

400 D2=XX-SX#SX/N:XD*SQR(D2/(N-1) ) 

420 D3«XY-SX#SY/N 

440 D4*YY-SY#SY/N* YD-SQR (D4/ (N-l ) ) 


500 M*D3/D2 

320 B* ( < XX*SY— SX*XY) / N ) / D2 
540 C* < XY-SX#SX/N) / (N-l ) j CC-D3/SQR ( D2#D4 
) 

560 SE«SQR((YY-SY#B-M#XY)/(N-2)) 

580 EM*SE/SQR <D2) 

600 EB»EM#SQR ( XX/N) 

620 F0RI*1T0N 
640 YC(I)-M#X<I>+B 
660 NEXT 
800 CLS 

805 PRINT"MEAN OF X EQUALS "jUSINGNISjX 
M 

810 PRINT"MEAN OF Y EQUALS "jUSINGNISjY 
M 

815 PRINT 

820 PRINT'STANDARD DEVIATION OF X IS "j 
USIN6N2S | XD 

825 PRINT-STANDARD DEVIATION OF Y IS "j 
USINGN2I; YD 

830 PRINT"COVARIANCE OF X AND Y IS ";US 
INGN1I; C 

835 PRINT-CORRELATION COEFFICIENT IS "j 
USIN6N2I; CC 
850 GOSUB6400 

870 PRINT" ##»##LINEAR COEFFICIENTS## 
###" 

875 PRINT-Y INTERCEPT IS " | USINGN1 *( B) i P 

RINT" error » " j USINGN4$; EB 

880 PRINT” SLOPE IS ” ; USINGN2*; H} 

:PRINT” error: " 5 USINBN4*} EM 

890 PRINT’^QUATION OF LINE THROUGH POINT 

S: w 

893 PRINTRV$f 

895 PRINT” Y * ” | USI NGN1 $; M} : PRINT” X 
” I USINGN3f| S 
897 PRINTNMIj 
910 6OSUB6400 

922 CLS* PRINT” <1>— LINEAR REGRESSION” 

924 PRINT” <2> COMPARE ACTUAL TO ESTIM 

ATED VALUE”; 

926 PRINT" <3>-~ PLOT DATA” 

927 PRINT” <4>— REVIEW STATISTICS” : PRIN 

T” <5> QUIT ” 


TRS-80 MODEL 100 OWNERS 

Three Software Packages From QAD 


1 . TYPIT (Output from TEXT) $24.95 

a. Set margins - top, bottom, left, right. 

b Set line spaces - single, double, etc. 

c. Page numbering - start on any page number - include “footer.” 

d. Right justify. 

e. LIMITATION: Runs slow. 

2. TERM2 $19.95 

a. Solves problem of cursor ending up on right side of screen 
with certain host comupters. 

b. Upload (waits for host signal before sending each line). 

c. Download (sends signal to host when ready for next line). 

d. LIMITATION: For use with 300 baud. 

3. ELF (Eliminate Line Feed) $14.95 

When a word processing file is downloaded to the 1 00, “hard" line- 
feeds are sent by the host. ELF eliminates such line feeds so that 

the file can be used for word processing. 

SPECIAL!!! All of the above $39.95 


Send me the following program: 

TYPIT - $24.95 □ TERM - $19.95 □ ELF - $14.95 □ 
All 3 Programs - $39.95 □ 

Name 

Address 


City 

□ Payment Enclosed 
Charge □ Visa d 
Account No. 


State Zip_ 

MasterCard 

Interbank No. (MC only)_ 


Signature 



GROWTH ASSOCIATES For more information 
Jane Hershberger or to order by phone 

1901 East First Street call: 

Newton, KS 67114 (316) 283-2400 
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929 PRINT* INPUT*'WHICH NUMBER " j RE 

930 ONREGOSUB3000, 4000, 6000, 800, 999 
940 BEEP 

950 S0T0922 

999 CLSsEND 

1000 CLS 

1020 INPUT-NUMBER OF DATA POINTS"|N 
1040 PRINT 
1060 FORI-1TON 

1080 PRINTIjTAB(5)j: INPUT "ENTER X , Y " j X 
(I) ,Y(I) 

1100 NEXT 
1120 RETURN 

1130 IFERR"52THENBEEPsPRINTRV*j SPRINT "SO 
RRY NO SUCH FILE EXISTS IN MEMORY !!"} s PR 
INTNM* 

1151 FORI “ 1TO2000: NEXT s RESUME2000 
2000 CLS 

2020 LINE INPUT-NAME OF DATA FILE IS "|F 

$ 

2030 IFF*"" "THENGOTQ2000 
2040 OPEN F* FORINPUTAS1 
2050 K*0 
2060 K"K + 1 

2065 PRINT080, " NUMBER ":PRINT090, "X -VALUE 
" SPRINT §105, "Y- VALUE " 

2066 PRINT8120,KsPRINT0130,XsPRINT0145,Y 
2080 INPUT#1 , X , Y 

2100 X (K)*X: Y(K)*Y 
2120 IFEOF ( 1 ) THEN2160 
2140 GOTO2060 
2160 N*K 
2180 RETURN 
3000 CLS 
3005 RE«0 
3010 PRINTRV* 

3012 PRINT" LINEAR REGRESSION 

II 

3014 PRINT-CORRELATION COEFFICIENTS "USI 
NGN2*;CC; 

3016 PRINTNM* 

3020 PRINT" <1>— CALCULATE Y GIVEN X " 

3040 PRINT” < 2 > CALCULATE X GIVEN Y " 

3060 INPUT"WHICH NUMBER " 5 RE 

3065 IF (RE >2) OR <RE<*0> THENBEEPs GOTO3000 

3070 IFRE=2THENGOTO3100 

3082 INPUT"ENTER YOUR VALUE OF X " j X 

3083 Y»M*X+B 

3084 PRINTiPRINT"FOR X = ";X;" Y * ";Y 
3086 LINE INPUT "ANOTHER CALCULATION ? Y/N 
"jRE* 

3090 IFRE*“" Y"THEN3000 
3095 RETURN 

3100 INPUT-ENTER YOUR VALUE OF Y " 5 Y 
3120 X B < Y-B ) /M 

3140 PRINTsPRINT"FOR Y = " 5 Y 5 " X = ";X 
3160 LINEINPUT-ANOTHER CALCULATION ? Y/N 
"}RE* 

3180 IFRE*=" Y"THEN3000 
3190 RETURN 


4000 CLS 
4020 PRINTH* 

4060 FORI" 1 TON 

4070 IF ( I/ 6 -INTX 1/6) ) -0THENGOSUB5000 
4080 Y*M*X ( I ) +B 

4100 PRINTX (I )TAB( 10>Y (I ) TAB (20) US I NGN It 

|Y 

4120 NEXT 
4130 GOSUB6400 
4140 RETURN 
5010 GOSUB6400 
5030 PRINT 
5040 PRINTH* 

5060 RETURN 
6000 CLS 

6010 ONERRORGOTO6300 
6020 C 1 "Y ( 1 ) s C2"C1 
6030 FORI-1TON 
6040 IFC1<“Y(I) THEN6060 
6050 C1*Y ( I ) 

6060 IFC2>“Y ( I ) THEN6080 
6070 C2*Y ( I ) 

6080 NEXT 

6090 LINE < 1 10,30) — (210,30) ,1 
6100 LINE(160,5>— (160,55) ,1 
6110 PRINT627, "Y" 

6120 PRINT0155, "X" 

6130 Y1"C1 8 Y2*C2 
6140 KX"100/ (X (N) -X ( 1 ) ) 

6150 KY=50/ (Y2-Y1 ) 

6160 FOR I * 1 TON 

6170 PSET ( (X(I)-X(1))*KX+110,55-<Y(I)-Y1 
)#KY) 

6180 NEXT 

6182 FORX*X(l)TOX(N)STEP<X<N)-X(l))/50 
6184 PSET( (X-X(l) )*KX+1 10,55- <(M*X+B)-Y 1 
)#KY) 

6186 NEXT 

6188 PR I NT80 , " Y-MAX " ; 

6190 PRINT87, USING"#. ## AAA -'"|Y2 
6195 PRINT§240, "Y-MIN" 

6200 PRINT§247,USING"#.## AA/ ' A "jYl 
6208 IFLEN<STR* (X < 1 ) ) ) >9THENPR INT0297 , US 
ING"#.### AAAA "jX(l)}s G0T06215 
6210 PRINT0297 , X ( 1 ) 5 

6215 IFLEN (STR* < X ( N ) ) ) >9THENPRINT0310,US 

ING " #. ### AAAA " 5 X (N ) 5 SGOTO6230 

6220 PRINTS316-LEN(STR*<X<N) ) ) ,X<N ) 5 

6230 GOSUB6400 

6260 RETURN 

6300 BEEPs RESUME 6188 

6400 PRINTRV*; s PRINT0280, "(PRESS ANY KEY 
>"; r FORK" 1TO200: NEXT s PR INTNM*; sF0RK»lT02 
00: NEXT 

6450 R*"INKEY* 

6475 PRINT0280, "(PRESS ANY KEY>" ; s FORK " 1 
TO200: NEXT 

6500 IFR*=" "THEN6400 
6520 CLS 

6550 RETURN 033 
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A Timer 

For Your Chess Game 

By Larry Boulet 


T his short program is called Chess Timer and uses 
some of the new BASIC features available on the PoCo 
Microsoft BASIC. The program waits until a key is 
pressed (any key) and starts timing the player on the white 
side. When any key is pressed again, the white clock stops 
and the black starts. Every key press alternates sides unless a 
total of five minutes elapses at which time the computer 
emits a series of beeps indicating the end of the game. The 
player who ran out of time is the loser. 

The listing: 


10 ' ##*#*♦##*#**#♦**##*#**#*### 


20 '* Ches* Timer * 
30 '* by * 
40 '* Larry Boulet * 
50 ' #f or longer times, change # 
60 *variable t3 in line 190 # 
70 ’ *and t4 in line 360 * 


80 '*####******##**####*####### 

90 ’######*###*#*########**###* 

100 CLS:PRINTTAB<15) 5 “Chess Timer" 

110 PRI NT i PRI NTTAB ( 1 3) $ " ##Hi t any key#*" 
115 PRINT} PRINT: PRINT: PRINTTAB< 11 ) "white 
black" 

117 LINE (52,30) - ( 108,40) , 1 ,B 

110 LINE < 130, 30) - ( 186 ,40) , 1 ,B 

120 IN$=INKEY$:IFIN$»" "THEN 120 

130 PRINTil 70, T3} " j T2:PRINT#183,T3: ": " 

|T2 

135 T3«0t T2*0i T1»0: TX*0: PRINT 
137 T 1 *T% 

140 TI$«MID$ (TINE $, 8 , 1 ) 

145 IN$=INKEY$:IFIN$O""THENGOTO310 
160 T7.=VAL(TI$) 

170 IFT1*TXTHENG0TO140 
180 PRINTI170,T35":" 5 T2 
190 IFT3*5THEN500 
195 T2*T2+1 

210 IFT2>59THENT2*0:T3»T3+1 
220 60T0137 

300 T4*0: T5«0: T 6 “ 0 : T7*0 
310 T6*T7 

320 TI$*MID$(TIHE$, 8 , 1 ) 

325 IN$»INKEY$: I FINK >" "THEN80T0137 
330 T7*VAL < TI$) 

340 I FT6=T7THENGQTO320 
350 PRINTfil83,T4| H :"jT5 
360 IFT4-5THEN500 
370 T5*T5+1 

380 IFT5>59THENT5*0:T4»T4+1 
390 GOTO310 

500 BEEP: BEEP: BEEP: BEEP 

510 END S 33 


GOLDLABEL" 

BLANK CASSETTES 

★ PREMIUM 5 SCREW SHELL 
★ COMPUTER DATA QUALITY ★LOW NOISE 
★ MADE IN USA ★GUARANTEED 

1 DOZEN C-10 LENGTH $8.50 + $2.50 shpg. 

2 DOZEN C-10 LENGTH $16.00 + $3.50 shpg. 

1 DOZEN C-30 LENGTH $12.50 + $2.50 shpg. 

2 DOZEN C-30 LENGTH $23.50 + $3.50 shpg. 

Individual storage boxes (sold only with cassettes) $2.40 per dozen. 
CASSETTE CADDY: $3.95 + $2.00 shpg. 

2 for $7.00 + $3.00 shpg. 

Free shipping on one caddy with each dozen cassettes. 

Foreign orders include shipping at 16 oz. per dozen tapes/9 oz. per 
caddy/13 oz. per dozen boxes. Shipped in U.S. by UPS. 


CASSETTE CADDY 

TIRED OF MISPLACED TAPES AND A CLUTTERED WORK AREA? TRY 
OUR HINGED TOP SMOKED PLASTIC CADDY THAT HOLDS 12 TAPES IN 
ONE HANDY LOCATION. EDGE LABELS INCLUDED TO IDENTIFY TAPES. 



PCM 


CERTIFICATION 

SEAL 


Visa and Mastercard accepted (include expiration date) Orders paid by 
cashier’s check, money order or bankcard are shipped within 48 hours. 
Personal check takes 1-2 wks. No COD. Some foreign sales are restricted. 
Texas residents add 5% tax. 

COLOR SOFTWARE SERVICES 
P.0. BOX 1708, DEPT. R 
GREENVILLE, TEXAS 75401 

Telephone Orders: (214) 454-3674 9-4 Monday-Saturday 

★ DEALER INQUIRIES INVITED *QUANTITY DISCOUNTS AVAILABLE 
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Radio Shack’s New 
TRS-80® Model 100 
Portable Computer 
Is Sending Shockwaves 
Throughout the Industry 


8K TRS-80 Model 100 24K TRS-80 Model 100 



Only $54 a Month Only $68 a Month 

on CitiLine Credit on CitiLine Credit 


■ Powerful Built-In Software 
and Extended BASIC Language 

■ Self-Contained Direct-Connect 
Telephone Modem 

■ 8-Line by 40-Character Display 

■ Full-Size Typewriter Keyboard 

■ Retains Data When Power “Off” 

■ Memory Expands to 32K 

Brace yourself— Radio Shack just redefined the 
concept of personal computing. Our new TRS-80 
Model 100 is so small, it’ll fit in your in-basket. 

Yet, it’s as powerful as many desktop micros. The 
built-in BASIC language is the most advanced 
ever from Microsoft®, and features full string han- 
dling, complete file operations, multi-dimension 
arrays, 14-digit double-precision accuracy, 

240 x 64 dot-addressable graphics, a five-octave 
sound generator and much more. The Model 100 
includes a parallel printer port, an RS-232C serial 
interface and a cassette port. Model 100’s built-in 
direct-connect modem even allows you to access 
any computer by phone. If you’re not a program- 
mer, “instant-on” software in ROM lets you use 
your Model 100 as a personal word processor, 
telephone auto-dialer, address book and appoint- 
ment calendar. Come see the most revolutionary 
computer since the TRS-80 Model I at over 6500 
Radio Shack stores and participating dealers, in- 
cluding over 400 Radio Shack Computer Centers 
nationwide. 


Radio /hack 

The biggest name in little computers® 

A DIVISION OF TANDY CORPORATION 


f Send me a free TRS-80 Model 100 brochure, j 

J Mail To: Radio Shack, Dept. 84-A-14 

300 One Tandy Center, Fort Worth, Texas 76102 

I NAME __ J 

I ADDRESS 2 


I CITY STATE ZIP c 

J TELEPHONE J 

l J 


Prices apply at participating Radio Shack stores and dealers. Microsoft is a 
registered trademark of Microsoft, Inc. 







Figure 1 


1 



Configuration after the computer and player 
have completed their sixth moves. The compu- 
ter has just made the 6-2 connection. The play- 
er's turn is next. 


Figure 2 


1 



4 


Here the computer wins because the player 
(solid lines) had only the 1-6 line available to 
draw, thus completing a triangle composed 
solely of the player's lines (1-6-4). 


IM is a two player game (you and 
the computer). After asking for 
your name and whether you 
would like to go first, the program will 
print six numbers in a hexagonal arrange- 
ment on the left side of the screen. You 
and the Model 100 will take turns draw- 
ing lines connecting the numbered ver- 
tices of the hexagon. Your lines will be 
solid, while the computer draws a dot- 
ted line. To draw a line, simply enter the 
two numbers that you wish to connect. 
You cannot connect two numbers that 
have already been connected by either 
you or the computer. 

The object of SIM is to avoid com- 
pleting a triangle composed of your own 
lines. Only triangles with vertices on the 
six starting points are considered. The 
final two moves of a sample game are 
shown in Figure 1 and Figure 2. 

The game of SIM was first published 
by Gustavus Simmons ( The Journal of 


Recreational Mathematics , V.2, April, 
1969, p. 66). In his article, Simmons 
proved that a draw was not possible, 
and later analysis showed that there is a 
winning strategy for the second player. 
For over a year I was convinced that the 
program made the computer unbeat- 
able when the human opponent went 
first. However, while preparing this 
article, I found a strategy which would 
beat the computer when I went first. A 
challenge for the reader is to first perfect 
playing the game as the second player, 
and then find a way to beat the compu- 
ter when it moves second. 

This program uses a heuristic algo- 
rithm developed by John Nairne and A. 
B. Sperry ( The Journal of Recreational 
Mathematics , V.6, Fall, 1973, pp. 243 — 
247). Nairne and Sperry estimated that 
there are 109,132,1 15,040 possible games 
of SIM , so get started and good luck! 


The listing: 

10 CLSs SCREEN0 , 0! PRINTfil 7 , " T-SIM" s PRINT# 
93, "BY RON PALUDAN" 8 FORZ*lTQ500s NEXT 
100 DIMTX (4 , 15) , HX ( 20) , CX ( 20) ,LX(20) f XL% 
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(6) ,YLX<6) 

110 F0RN*lT015i F0RJ*1 T04: READTX ( J , N) t NEX 
TJ,N 

1 20 F0RN*lT06lREADXLX(N> , YL% (N> I NEXT 
130 CLS 

200 LINE INPUT "YOUR NAME ? "|N*:CLS 
205 PRINT"DO YOU NANT TO 00 FIRST ?" 

210 8**INKEY*iIFB*-""THEN210 

220 IFQ*<>"N"ANDe*<>"Y"AND8*<>"y"ANDB*<> 

"n"THENBEEP: CLSa GOTO205 

230 FORN* 1 TO20I LX (N) *01 HX (N) *08 CX (N) *01 N 

EXT 

300 CLS 

301 MC*1 : MH*1 

310 PRINT030,"1 M 8PRINT0104,"6":PRINT0116 
, " 2 " 

320 PRINT0224, " 5" I PRI NT0236 , "3" 8 PRINT031 
0, "4" } 

400 IFB**"Y*OR8**"y"THEN700 

410 I-INT<RND(9)*6)+li J-INT <RND (8) #6) + 1 1 

60SUB1 000 

420 I FLX ( X ) *10R I*JTHEN4 10 

430 PL=IiY*0:LX(X)*l» GOT 0550 

440 PL*l:EX*81:FORI*lT05iFORJ*I+lTO6 

450 GOSUB1000! IFLX(X)>1THEN540 

460 G*0 I FORN* 1 T04i H*HX ( TX (N , X ) ) «C»CX(TX( 

N, X) ) 

470 IFH*0ANDC*0THENG*G+1 

480 IFH*lANDC*0THEN8«G+2 

490 IFH*0ANDC»lTHENG*G+4 

500 IFH=lANDC*lTHENG»8+0 

510 IFH*0ANDC*2THENG*6+20 

520 IFH*2ANDC*0THEN6*8+4 

530 NEXTNt IFG<EXTHENEX*B:EJ*JiEI*I 

540 NEXT J T 1 1 J-EJl I«EIlGOSUB1000 

550 REM PLOT COMPUTER'S MOVE 

555 IFXLX(I)*XLX(J) THEN600 

560 B*YLX(I)iM*(YLX(I)-YLX(J))/(XLX(I)-X 

LX ( J ) ) 

570 K*3jIFXLX(I>>XLX<J>THENK*-3 

580 FORZ*XLX(I)TOXLX(J) STEPK 

590 Y*M#(Z-XLX<I> )+BiPSET(Z,Y) sNEXTZtGOT 

0680 


600 K»3i IFYLX(I) >YLX<J)THENK— 3 

610 FORZ*YLX(I) TOYLX ( J ) STEPK! PSET ( XLX < I ) 

, Z) I NEXTZ 

680 FORN* 1 T04i CX ( TX <N, X ) ) *CX (TX (N, X ) ) +1 8 

IFCX(TX(N,X) ) *3THEN2000 

690 NEXTNi LX ( X ) *1 

700 PRINT00, "FIRST POINT ?"; 

705 8*»INKEY*s I=VAL (8*) I IFQ**" "ORI< 10RI > 
6THEN705 

710 PRINTI:PRINT«40, "SECOND POINT ?"$ 

715 FORT* 1 TO2008 NEXT 

720 W**INKEY*f J*VAL (N*) : IFW**" "ORJ< 0ORJ > 
6ORJ*ITHEN720 

730 PR I NT J i G08UB 10001 IFLX ( X ) -0THEN800 
740 PRINT00, SPACE* (20) »PRINTt40,SPACEt(2 
0) 

750 BEEPt 8OTO700 

800 REM PLOT HUMAN'S MOVE 

810 LINE(XLX(I) , YLX(I) )-<XLX(J) , YLX(J) ) 

900 F0RN*1 T04 J HX ( TX (N , X ) ) *HX (TX (N, X ) > +1 

910 IFHX(TX(N,X) ) “3THEN3000 

920 NEXT«LX(X)*1 

950 PRI NT§0 , SPACE* (20) : PR INT040 , SPACE* ( 2 

0) 

990 GOTO440 

1000 IFI>JTHENK*Jj J»I * I*K 
1010 X*15iF0RZ*5T0ISTEP-liX*X-<5-Z):NEXT 
n X = X- (6-J ) s RETURN 
2000 N**"COMPUTER" 

3000 PRINT0160,N* M LOSES!" 

4000 PRINT0240, "PLAY AGAIN ?" 

4010 Q**INKEY*t IF8*“" "THEN4010 
4020 IF8*» H Y"OR8*»"y"THEN130 
5000 DATA1,2,3,4,1,5,6,7,2,5,8,9 
5010 DATA3, 6, B ,10, 4, 7, 9, 10, 1,11,12, 13 
5020 DATA2,1 1,14, 15, 3, 12, 14, 16,4, 13 ,15,1 
6 

5030 DATA5, 11, 17, 18, 6, 12, 17, 19, 7, 13, 18,1 
9 

5040 DATA8, 14, 17, 20, 9, 15, 18, 20, 10, 16, 19, 

20 

6000 DATA183,9,213,20,213,44, 183,55, 150, 
44,150,20 

H3Z3 


r 8K MEMORY MODULES FOR THE 
k TRS-80 MODEL 1 00 PORTABLE COMPUTER 


$85 each, 2 or more $80 each 

Exact Replacements for RS Memory 
Easy To Install • Warranty Included 
VISA and MC Accepted • CA Residents Add 6.5% Sales Tax 

IOTA SYSTEMS • 1690 Day Valley Road • Aptos, CA 95003 • (408) 684-0482 

Prices Subject To Change Without Notice • TRS-80 is a trademark of Tandy Corporation 
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All work and no play makes Jack a dull boy . . . 


NOW YOU CAN HAVE 
FUN WITH YOUR 
24K MODEL 100 

4 games for your enjoyment: 

BLOCKADE — Your 'snake' grows longer as 
you hit the randomly appearing targets on the 
screen — as long as you don't run into yourself, 
a wall, or your opponent! A one or two player 
real-time game with optional sound and three 
speeds of play. 

REVERSI — A 'board' game in which you try to outflank your 
opponent to end up with the most squares at game's end. Play against 
the computer or another human. 

FRANKENSTEIN ADVENTURE — Find all of the necessary 
equipment to awaken the monster. The clues are hidden and the pitfalls 
are many! 

ALEXIS ADVENTURE — Sail the seas and traverse the islands to 
recapture your kingdom. Chart your course or you may sail on forever! 


\ ] — a lot of software for a little silver 

CERTIFICATION 

SEAL 

All four games on tape for only $24.95 Silverware POBox 21101 

Calif, residents add 6% tax, overseas add $1.00 shipping Santa Barbara, CA 93121 

Mastercard & Visa Dealer inquiries invited (805)966-1449 




Among Printer 

Utilities LLST Is 
Without Parallel 



By Dale Wheeler 

A utility to use an MX-80 equipped with serial interface and 
the Model 100 via the RS-232 port. 


S hortly after purchasing my M 100 
it became necessary to produce 
listings of BASIC programs that 
were being developed. The only prob- 
lem was that my MX-80 printer is 
equipped with a serial interface for use 
with my Color Computer. With the 
interface in place, the parallel input to 
the printer cannot be used. 

Several options were available to 
solve this problem. The first was to buy 
another printer for use with the Porta- 
ble. A flat pocketbook and harsh frowns 
from the spouse seemed to eliminate 
this fix! 

A new interface that can be switched 
between the serial and parallel inputs 
was deleted from the list for the same 
reason. 

Unplugging the serial interface when 
using the printer with the Model 100 
seemed impractical and downright bother- 
some. 

The quickest and cheapest answer to 
the problem turned out to be the utility 
program listed below. 


Getting Ready 

Before the program can be used, a 
printer cable will have to be purchased 
or made up to connect the RS-232 con- 
nector on the Model 100 to the MX-80 
serial interface. Only two of the 25 con- 
ductors are necessary. Pin 7 of the com- 
puter connector is tied to pin 7 of the 
printer connector. This provides a SIG- 
NAL GROUND path for the two ma- 
chines. Next, pin 2 on the computer 
connector (T ransmit Data) is tied to pin 
3 on the printer (Receive Data). This is 
the data path. 

Experimenting has shown no way to 
use any of the other pins to provide a 
PRINTER READY signal for use in 
controlling thd output of the computer. 
If anyone can provide this information 
please do so by writing me through 
PCM. 

After LLST has been keyed in, you 
may want to customize it to your par- 
ticular printer by changing the OPEN“- 
COM : command in line 30. Refer to the 
M100 manual, page 165, for informa- 


tion on the correct syntax. The program 
is set up for use with 8 bit words and a 
Baud rate of 2400. 

The program to be listed must be 
saved to RAM in ASCII format with 
the SAVE“name”,A command. 

Running the Program 

Now run the LLST program and re- 
spond to the “File Name?” prompt with 
the name of the program saved earlier in 
ASCII. Your program will be listed in 
standard format. No fancy line breaks 
or page breaks are provided. 

Since the printer cannot tell the com- 
puter when it is or is not ready to receive 
data, a delay loop is provided in the 
program. The length of the delay was 
arrived at by trial and error and al- 
though it sometimes seems too long, ex- 
perience has shown otherwise. On slower 
printers, of course, a longer delay will be 
necessary. 

The program can be used to print 
most files with a .DO suffix, but the 
program may crash when printing files 
created by the TEXT program. 


The listing: 

1 LLST 
5 CLEAR 1 000 
10 MAXFILES-2 

12 FI #i s CLSi PRINTS FILES: INPUT H File nan 
e M }Fl*: IFLEN (Fl$) >60RF1** H "THENBEEP i GOTO 
12 

14 F1** M RAM: M +F1*+ M .DQ H 

20 CLOSE# 1 : 0PENF1$FQR INPUT AS 1 

30 OPEN" COM i 68E2E M F0R OUTPUT AS 2 

40 IFE0F ( 1 ) THENBEEP i GOTQ60ELSELINEINPUT# 

1,A* 


42 IFLEN ( A$) <78THENXX*LEN < A$) ELSEXX*78 
44 B*»LEFT*<A*,XX) » A*-RI0HT* <A$ , LEN < A*> - 
XX) 

48 PRINTB*iPRINT#2,B*CHR$<13)5 

50 FOR X* 1 TO 1500sNEXTXiIFLEN<A$)>0THEN 

42ELSE40 

60 CLOSEsPRINTi INPUT"Pre*s <Q> to quit o 
r <ENTER> to list another prograi"jQU 
IT$ 

70 IF QUI Tt*“Q M 0RfiUIT$ cM q" THENEND 

80 RUN Q33 
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FOUND! The MIOO's 
'HkMrar Cursor Control Keys 


By Frank 




Keyboard Layout 

< < t > t print 

line file char line disp cut 

QWERTYUIOPC 


prntr 
tab copy codes 


< < 

word char 


> > 

char word save bksp 


select 


AS DFGHJKL 


v cancl 


file char loaddsplay 

Z X C V b’ n m 


(Frank Hogg is the president of 
Frank Hogg Laboratory, one of 
the world’s largest suppliers of 
software for 6809 based compu- 
ters. He and his wife Linda live in 
Syracuse, New York.) 


singthe Model 100’s cursor con- 
trol keys has always been a pain. 
I rarely remember which key is 
which without looking at them and I 
often hit the wrong one. Wouldn’t it be 
nice if it had cursor keys that were logi- 
cally placed so that I wouldn’t have to 
fumble? Well maybe you, like me, didn’t 
know it, but the M 100 has that built in! 
That’s right, they are built in, and Radio 
Shack even told you about them. Look 
on page 59 of your manual for refer- 
ence. Under the heading “Using Control 
Codes and Other Special Key Combina- 
tions” will give you all the information 
in a way that almost guarantees that you 
will not realize its importance. 

Refer to the keyboard layout below 
for a much better idea of how this 
works. If you are familiar with Word- 
star or DynaStar text processors you 
will recognize the layout. The beauty of 
this over using the cursor keys is that 
you can do the cursor movement with 
only one hand. Use your pinky for the 
control key and hit the appropriate key 
with your index finger. Using the cursor 
keys is very slow in comparison and 
requires two hands, one for the control 
key and one for the cursor key. Also, the 
cursor keys are not laid out in a logical 
way and are difficult to remember. 

Looking at the layout below you will 
notice a pattern with the “ESDX” keys. 
These keys do the same thing that the 
cursor keys do with the exception that 
they make much more sense. E is up, X 
is down, S is left and D is right. The A 
and F keys do the same as using SHIFT 
and the right and left cursor keys, A is 
left word and F is right word. Study the 
pattern and you will see the logic of this 
layout. Without this layout below, I was 
able to use these keys after only a few 
minutes. That may be because 1 use 
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DynaStar on the Color Computer so 
often and most of the keys are the same. 
When 1 found this out I was much more 
impressed with the 100 than before. I 
never did think that the cursor keys 
were very well laid out, but with this 
ability, I now never use the cursor keys 
in the editor. 

You can use the CTRL keys in the 
M 100’s BASIC editor but the A and F 
keys will have a tough time determining 
just what constitutes the beginning of 
the next word. In the line 

10 B=INT(27*A) 

the editor will think that B is one word 
and 27 is the next. It doesn’t think that 
INT is a separate word. This probably 
has something to do with the special 
characters used in BASIC programs and 
should give you no problem. I just don’t 
use A and F while in BASIC. 

CTRL P is a new one and is only 
mentioned on page 60 after all the other 
stuff, at least as far as I know, because I 
haven’t read the manual all the way 
through yet. (Who ever does!) CTRL P 
allows the embedding of printer control 
codes in your text. Because 1 always 
upload my files to our big GIMIX OS9 
system for final processing, I have never 


used these codes, but if you are using a 
printer hooked to your 100 I am sure 
that these will be of use to you. 

Just as a point of interest, I thought 
you might like to know what I use my 
M 100 for. As some of you may know, I 
have a software company for the TRS- 
80 Color Computer. We do not have 
anything for the 100, so why, you may 
ask, do I have one? Good question, and, 
as my wife would say, “Because I didn’t 
already have one.” Oh well, some peo- 
ple just don’t understand the necessities 
of life, I guess. 

I didn’t use my Model 100 very much 
for the first few months 1 had it because 
I have computers at home and at work 
and I am never far away from one when 
the need arises, at least until now, that 
is. Right now, it is the middle of July 
and we are spending most of our time at 
a camp 30 miles outside of town. Last 
year I hauled a Color Computer with 
disk drives and a printer and all the 
wires and cables, etc., down here and it 
was a hassle for two reasons; first, 
because this is supposed to be camp and 
not work, and second because of all the 
stuff I had to carry. This year I decided 
to leave the CoCo home and not bring 
any computer down here. That lasted 


until 1 packed the car and, what do you 
know, I forgot to leave the M 100 home. 
Good thing, too, as the peace and quiet 
has given me the time to catch up on 
most of my writing. After I get into 
work I hook up the Ml 00 up to the 
RS-232 port of our multi-user GIMIX 
OS9 system and using TELCOM and 
TERM I can then log on the system as a 
terminal. It is then a simple matter to 
upload the files the the GIMIX and with 
DynaStar , I do the final word process- 
ing and the spelling checking with Dyna- 
Spell (because I can’t spell very well). 
Then it’s just a simple matter to print it 
out and away I go. 

1 did find that 8K was not enough, so 
I bought an 8K chip from Computer 
Plus and installed it myself in about five 
minutes. This gives me about six or 
seven pages of text storage which is 
about all 1 want to write while down at 
camp. When the chips come down in 
price sometime this fall 1 will buy the 
other 16K. But at the cost of them now, 
I am going to wait until I really need 
them before I buy them. 

All in all, I really like the Model 100 
and am glad I bought it. My wife, how- 
ever, just gives me a funny look when- 
ever 1 mention it. __ 
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Department 



By Robert Frowenfeld 
PCM Contributing Editor 


(Robert Frowenfeld owns his own 
computer programming firm in 
Louisville , Ky and has com - 
pleted his graduate coursework in 
Computer Science at the Univer- 
sity of Louisville.) 


I n our first edition of On The Road we looked at a loan 
amortization program which can be very useful when 
the need arises to borrow or loan money. As you know, 
there are many other types of financial computations that, 
when used properly, become extremely valuable tools in 
conducting day-to-day financial affairs. Today we are 
going to look at a variety of economic analyses that can 
turn your Portable Computer into a powerful financial 
decision maker. If you’ve ever seen one of those calculators 
which has special buttons for such computations as com- 
pound interest, present worth, etc., you will be happy to 
know that the program presented here will perform these, 
as well as more complex, calculations. 

I ’ve named this program EC A NL which is my contrac- 
tion for the term Economic /4/VaLlyzer. ECANL was 
designed to perform the following types of economic eva- 
luations (see main menu listing): 

1) Compound Amount 

2) Series Compound Amount 

3) Sinking Fund 

4) Capital Recovery 

5) Present Worth 

6) Series Present Worth 

7) Gradient Present Worth 

8) Gradient Uniform Series 
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The following table shows the formu- 
las required to perform each computa- 
tion: 


1) Compound Amount: 

F = P( 1 + if 

2) Series Compound Amount: 


F= A 


(1 + 




3) Sinking Fund: 


A = F 


(1 + 0" - I 


4) Capital Recovery: 


A — P 


i(l_ + /)"_ 
(I + /)" - 1 


5) Present Worth: 

P = F( 1 + /)-« 

6) Series Present Worth: 

p = T<L±_£lJ. 

i(l + /)" 


7) Gradient Present Worth: 


’(1 + /■)" - 1 

1 

- - ■ f] 

l 

(1 + if_ 


8) Gradient Uniform Series: 

A = g[ ' - — 

i (1 + if - I 


Where: 

i = interest rate per interest period. In 
the equations above, the interest rate is 
stated as a decimal (that is, 8 percent 
interest is 0.08). 

n = number of interest periods. 

P— a present sum of money. 

F = a future sum of money. The future 
sum F is an amount, n interest periods 
from the present, that is equivalent to P 
with interest rate i. 

A = an end-of-period cash receipt or 
disbursement in a uniform series, con- 
tinuing for n periods, the entire series 
equivalent to P or Fat interest rate /. 

G — a uniform arithmetic gradient repre- 
senting a period-by-period increase in 
payments or disbursements. 

Y ou will notice that each of the above 


formulas uses the exponential expres- 
sion ( 1 T /)". This is used to compute the 
compounding effect of interest from 
one period to the next. The table below 
illustrates the compounding effect of 10 
percent interest paid annually over the 
course of five years on an initial princi- 
pal amount of $1,000. 


Year 

Interest 

Amount 

1 

100.00 

1,100.00 

2 

1 10.00 

1,210.00 

3 

121.00 

1,331.00 

4 

133.10 

1,464,10 

5 

146.41 

1,610.51 

We’ll now go into a little more detail 


to show how and when to use each of the 
eight economic analyses. Let’s start off 
with the simplest one. Compound 
Amount. As shown in the five year table 
above, this is the formula to use when 
you want to compute the future value of 
a sum of money compounded at a cer- 
tain rate of interest. As an example, say 
you have a savings account that claims 
to pay 8 percent interest, compounded 
daily. The periodic interest rate would 
be 0.08/ 365 (days in a year) = .0002 19178 
percent per day. Let’s say that at the 
beginning of the year you had $3,2 1 2.78 
in this account. Using the Compound 
Amount formula with: present value P 
= 3212.78, interest rate i= .000219178, 
and number of periods n = 365, the 
program will return a value of $3,480.33, 
the value of the savings account at the 
end of the year (see Figure 1 ). A word of 
caution is issued here. Not all banks 
figure interest the exact same way. Some 
use interest rates based on years that 
have less than 365 days— this acts in 
your favor. Other banks may quote 
average or historic rates which actually 
vary daily. Furthermore, your Model 
100 works in double precision (unless 
told to do otherwise) which results in 14 
significant digits. Believe it or not, there 
are many bank computers and interest 
tables that banks use to figure interest 
that are not as accurate. So beware, 
your Model 100 can be more accurate 
than your bank. But be sure you know 
how your bank is figuring your interest 
before you accuse them of short-chang- 
ing you. Believe me— I’ve done it— 
they’ll listen to you, and change things if 
you’re right; just be sure you know what 
you’re doing. 

Now for the next analysis, Series 
Compounding Amount. The best exam- 
ple I can think of to illustrate this for- 
mula is the famous bank Xmas Club 
Account. Say for example, you pay 
$ 100 a month into such an account and 
the bank claims it is paying 6 percent 
annually, compounded monthly. In this 


case, you would use an end-of-period 
payment A of 100, 12 periods n and an 
interest rate / of .06/ 12 = 0.005; plug- 
ging this into your Model 100 should 
yield (see Figure 2) an amount at the end 
of the year of $1,233.56. 

Our next example is the Sinking 
Fund. Here’s where you get to use your 
imagination a little bit to play with the 
real power offered by your Model 100. 
Say you have an ambitious dream (don’t 
we all): you want to buy a house, and 
you figure that in order to make the 
down payment five years from now, you 
would like to have $25,000. You also 
figure that your money will be able to 
earn for you 8 percent per year (after 
taxes). Using the sinking fund analysis 
(#3), just enter 25000 for the future 
amount F, .08 for the interest rate i, and 
5 for the number of periods n\ your 
Model 100 will instantly respond with a 
figure of $4,26 1 .4 1 (see Figure 3); this is 
amount you would have to save annu- 
ally over the five years (at 8 percent 
interest) to have $25,000. 

The Capital Recovery formula is used 
to determine the actual periodic cost of 
something over a given period of time. 
Say, for example, you are given the 
option to rent office furniture for $250 
per month, or you buy it now for 
$10,000 knowing in the latter case that 
the furniture will only last five years, 
after which you would have to replace 

“ The Present Worth ” 
formula is a simple , yet 
useful tool Given an 
amount of money some- 
time in the future , this 
formula lets you know the 
true value of the present 
time . 


it. Assume that the $250/ month rental 
contract is also for a five-year period 
and that interest rates during this time 
are expected to average 12 percent, 
compounded monthly; should you buy 
or rent? Aha, enter the capital recovery 
formula. You know what your monthly 
cost will be if you rent the furniture — 
$250; but what will it really cost, includ- 
ing the lost interest, if you plop down 
$10,000 now? In this example we are 
assuming that the furniture— after five 
years — will have no value (if you buy it), 
and that the rental company will not 
offer you a nice deal to purchase five- 
year-old furniture from them at a dis- 
count. Using $10,000 for the present 
value P, 60 (five years times 1 2 months/ 
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year) for the number of periods n and 
.12/12 = .01 for the interest rate /, the 
formula yields a figure of $222.44 per 
month (see Figure 4). This would indi- 
cate that purchasing the furniture now 
(assuming interest rates stay constant) 
would be the smarter buy. 

The Present Worth formula is a sim- 
ple, yet useful, tool. Given an amount of 
money sometime in the future, this for- 
mula lets you know the true value of the 
present time. Say you wanted to have 
$2,000 in a savings account at the end of 
four years and 7.5 percent interest was 
paid annually, how much should you 
put into the savings account now to 
have the $2,000 four years from now? 
To compute this, use a future value Fof 
2000, number of periods n of 4, and an 
interest rate i of .075; this will yield a 
value of $1,497.60 (see Figure 5). 

As an example of Series Present 
Worth, let’s say you want to buy the 
love-of-your-life a diamond ring, and 
you can’t decide whether to pay $1,500 
now, or $100 a month for 20 months, 
knowing that if you pay monthly you 
can put the rest of the money in the bank 
at 12 percent interest compounded 
monthly. Here, the period payment A is 


100, the number of periods n is 20, and 
the periodic interest rate i is .12/12 = 
.01; using these figures, the present 
value of the money is $1,804.56 (see 
Figure 6). In this case, you would be 
much better off paying the $ 1 ,500 today 
as its value is less than the present value 
of the 20 monthly payments. If, on the 
other hand, you were offered the chance 
to make 24 payments of $70 each, you 
would be better off making the monthly 
payments since the present worth of 
those payments would be only $ 1 ,487.04! 

The remaining two formulas. Gra- 
dient Present Worth and Gradient Uni- 
form Series are economic analyses used 
to evaluate situations where the perio- 
dic cash flow A is a steadily changing, 
rather than constant, amount. As an 
example of Gradient Present Worth, 
assume that you have just purchased a 
new car and you estimate that the 
annual maintenance on the car will fol- 
low the schedule below: 

Year Maintenance Cost 

1 $150 

2 225 

3 300 

4 375 

5 450 


Being alert, cunning, sly, swift and per- 
ceptive, you want to prepare for the 
future by placing a sum of money in the 
bank now which, with annual interest 
compounding at 7 percent per year, will 
pay for the first five years’ maintenance. 
The cash flow in the table above can be 
broken down into two components, a 
fixed $150 each year, plus a uniformly 
increasing amount of $75 per year. This 
concept is illustrated below: 

Year Fixed Cost Increasing Cost 


1 

$150 

$ 0 

2 

150 

75 

3 

150 

150 

4 

150 

225 

5 

150 

300 


Using the Series Present Worth analysis 
already described, we can compute the 
amount needed to be (,4=150, n— 5, 
/= .07) which yields $615.03. For the 
increasing cost portion, we need to use 
the Gradient Present Worth formula 
with G=75, n= 5, /= 07; this gives a value 
of $573.50 (see Figure 7). This means 
you would have to put away $1,188.53 
today to be able to withdraw the neces- 
sary funds over the next five years to 
pay for your maintenance. 





Silverware - 4 games on cassette 
Blockade Frankenstein Adventure 
Reversi Alexis Adventure 
(24K) $24.95 

Prickly-Pear Software 10% OFF 

Viking - (24K) simulation game 
cassette $19.95 
Bowling League Secretary (24K) 
cassette $34.95 

Football - Armchair Quarterback Strategy 
(16K) cassette $19.95 


BUSINESS 

Skyline Software 

PortaCalc - Electronic spreadsheet 
with 15 column by 26 row workspace! 

Full use of built in function keys. 

(24 K) cassette $69.95 

'PortaStat - statistical package 
‘PortaMax - linear programming 
(24K) $44.95 ea. 

Other Porta series programs 
being released soon at $44.95 ea. 
’PortaFin 
'PortaFolio 

* interactive with PortaCalc data files 

Portable Computer Support Group 

Business Pak+ includes: Write*, Graphs, 

Expns+, Telex*, Put*, Sort* 

& a 120-page manual 
6 cassettes (8K) $1 19.95 

# 

Personal checks welcome. 

Please add $2.00 for shipping. 
Tennessee residents add 6.25% sales tax 
C.O.D. orders add $2.00. 

Send for free complete catalog and descriptions! 


(615) 875-8656 • P.O.Box 15892 • Chattanooga, TN 37415 
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The Gradient Uniform Series is used 
to determine the annual (or periodic) 
cost (or benefit) of an item which has a 
cost (or savings) that decreases uni- 
formly over time. The following exam- 
ple illustrates this concept. Y ou are con- 
fronted with the following situation: 
you need to install additional insulation 
in your house to reduce energy con- 
sumption and you figure that no matter 
what kind of material you use, it will last 
ten years. You can purchase insulating 
material X or insulating material Y, and 
each will cost the same to purchase. 
Material X will result in energy savings 
of $420 per year. Material Y is strange; 
it will save you $400 the first year, but 
each year it will reduce the savings by 
$40. Which should you choose, taking 


into account that interest rates are ex- 
pected to be 1 2 percent over the next ten 


“ Depending on your 
needs , you will probably 
find several (if not all) of 
the above economic ana - 
lyses useful in planning 
both your day-to-day 
money matters as well as 
your financial future. ” 


years? Well, material X will save you 
$240 per year, that’s obvious. To deter- 


mine the annualized savings from mate- 
rial Y, we use the Gradient Uniform 
Series where the gradient G is 40, n= 10, 
and /=. 12; this gives $143.39 (see Figure 
8) and represents the reduced savings 
year after year. Therefore, the annual- 
ized benefits of material Y are $400- 
143.39 = $256.61, which is less than the 
$240 that will be saved using material X y 
so you would choose to use material Y. 

Depending on your needs, you will 
probably find several (if not all) of the 
above economic analyses useful in plan- 
ning both your day-to-day money mat- 
ters as well as your financial future. In 
this ever-changing world of interest rates 
and banking regulations, these formu- 
las should help in deciding how to make 
the most of your money. 


Select Economic Analysis: 

1- Compound Amount 5-Present Worth 

2- Series Cmpd. Amt. 6-Series Pres. Worth 

3- Sinking Fund 7-Grad Present Worth 

4- Capital Recovery B-Grad Unif. Series 

Figure 1 COMPOUND AMOUNT 

Present Value: 3212.78 
Interest Rate: .000219178 
Number of Periods: 365 
Future Value = $3,480.33 

Figure 2 SERIES COMPOUND AMOUNT 

Periodic Payment / Receipt: 100.00 
Interest Rate: .005 
Number of Periods: 12 
Future Value. - $1,233.56 

Figure 3 SINKING FUND 

Future Value: 25000.00 
Interest Rate: .08 
Number of Periods: 5 
Periodic Amount ■ $4,261.41 

Figure 4 CAPITAL RECOVERY 

Present Value: 10000.00 
Interest Rate: .01 
Number of Periods: 60 
Periodic Amount * $ 222.44 

Figure 5 PRESENT WORTH 

Future Value: 2000.00 
Interest Rate: .075 
Number of Periods: 4 
Present Value = $1,497.60 


Figure 6 SERIES PRESENT WORTH 

Periodic Payment / Receipt: 100.00 
Interest Rate: .01 
Number of Periods: 20 
Present Value ■ $1,804.56 


Figure 7 GRADIENT PRESENT WORTH 

Uniform Arithmetic Gradient: 75 
Interest Rate: .07 
Number of Periods: 5 
Present Value = $ 573.50 


Figure 8 GRADIENT UNIFORM SERIES 

Uniform Arithmetic Gradient: 40 
Interest Rate: .12 
Number of Periods: 10 
Uniform Arithmetic Gradient * $143.39 


The listing: 

10 CLEAR 100: DEFINT I-N 
25 DATA"Compound Amount ", "Seri es Cmpd. A 
mt . " , "Si nki ng Fund" , "Capi tal Recovery"," 
Present Worth ", "Seri es Pres. Worth", "Gra 
d Present Worth" , "Grad Unif. Series" 

35 FOR 1=1 TO 8: READ A$(I):NEXT I:GQT0 3 
9 

37 PRINTI285, "Press any key to continue 
... "j :A$=INPUT$<1) 

39 CLS: PRINT88 , "Sel ect Economic Analysis 
: " 

40 FOR 1=1 TO 8: PRINT840+40#I+140* < I >4) , 
USING"#"} I; :PRINT"-";A$<I) } tNEXT I 

45 PRINT8291, "Press "CHR$(27)"p ESC "CHR 
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DATA TRAC C-06, C-12, C-24 


From the leading supplier of Computer 
Grade Cassettes, new, longer length C-12's 
(6 minutes per side) provide the extra few 
feet needed for some 16K programs. 

Premium 5-screw shell with leader 
— BASF tape 

Internationally acclaimed. 
Thousands of repeat users. 

Error F ree • Money back Guarantee 




CASSETTE 
STORAGE CADDY 



Holds 12 
cassettes w/o boxes 
Includes edge labels 
and Index card 



. r iAL 500 C-12’s 380 each 

Shipping $1 7.00/500 


TRACTOR FEED 
• DlE-CUT BLANK 
CASSETTE LABELS 



w/labels add 40 w/boxes add 13# 

0^3 BASF Qualimetric Flexi-Disc— Lifetime Warranty. 

^)/) 51/4 Sin 9 le Side - Double Density, Soft-Sectored. 

NEW! MICRO CASSETTES in convenient short lengths 

MC-10 I Same superior tape in premium shell 
MC-20 WITH LEADERS. Supplied complete with 
MC-30 I box (fits Epson & Sharp micro drives) 

rv»ll. 919/710 1A90 for IMMEDIATE SHIPMENT 
Call. Z13/7l0-143u on Credit Card Orders 

ORDER r \mail TO: VORK 10°" Computer ware 

NOW 24573 Kitlridge St.,#P3,Canoga Park, CA 91307 

« ORDER FORM ——————— 


ITEM 

1 DOZEN 

2 DOZEN 

TOTAL 

C-06 

□ 700 

□ 1300 


C-12 

□ 750 

□ 1400 


C-24 

□ 9 00 

□ 17 00 


Hard Box 

□ 250 

□ 4.00 


Blank labels 

□ 3.00/100 

n 20 00 /1 000 


Storage Caddy @ $2 95 ea Qty 


Flexi-Disc 

□ 2695/10 

□ 120.00/50 


MICRO CASS. 

1 DOZEN 

2 DOZEN 


MC-10 

□ 16 50 

□ 32 50 


MC-20 

□ 18 00 

□ 34 50 


MC-30 

□ 1900 

□ 36.00 


SUB TOTAL 


Calif residents add sales tax 


SHIPPING/HANDLING (any quant., except tor Special) 

3.50 

Outside 48 Continental Stales- , 

Additional $1 per 


caddy, per doz cassettes or boxes per 10 discs 


TOTAL 



Check or M O 
•ncloeed □ 

□ PLEASE SEND QUANTITY DISCOUNTS 


Charge to 

Credit Card Q VISA Q MASTERCARD 


Each std. cassette 
includes two YORK 10 
labels only Boxes are 
sold separately. We 
prefer to ship by UPS 
as being the fastest and 
safest. If you need ship- 
ment by Parcel Post, 
check here □ 

NOTE: Additional 
charges outside 48 
Continental States 
Shipments to AK, HI, 
and USA possessions 
go by Priority Mail: 
Canada & Mexico— 
Airmail: 

All others— Sea Mail 


#P3 


Card No. . 


Exp. 


Name 


Address. 
City 


. State/Zip 


Signature 

Computer make & model 


.Phone . 


. Disk? (y/n) . 


$ (27) "q to ond-j 

50 PRINT033 , " * p At*INPUTt ( 1 ) I IF At-"* TH 
EN 50 ELSE IF ASC(At)-27 THEN MENU ELSE 
C-VAL (At) i IF C<1 OR 08 THEN 50 ELSE 90 

52 PRINT080, "Present Value: "pLINEINPUT 
At: P-VAL ( At) i IF P<»0 THEN 52 ELSE 70 

53 PRINT080, "Future Value: "pLINEINPUT 
At: F-VAL ( At) : IF F<-0 THEN 53 ELSE 70 

54 PRINT080, "Periodic Payeent / Receipt: 
"pLINEINPUT At: A-VAL(At) : IF A<-0 THEN 

54 ELSE 70 

55 PRINT080, "Uniform Arithmetic Gradient 
: "pLINEINPUT At: G-VAL < At) : IF G<»0 THEN 

55 ELSE 70 

62 X-P: 60SUB 80:PRINTt200, "Present Value 
- "{USING FtjP:60T0 37 

63 X-F: 60SUB 80: PRINT0200 , "Future Value 
* "{USING Ft{ F: SOTO 37 

64 X-A: G0SUB 80: PRINT0200, "Periodic Amou 
nt * "{USING Ft? A:G0T0 37 

65 X-A: 60SUB 80:PRINT0200, "Uniform Arith 
metic Gradient * "{USING FtjA:GOTO 37 

70 PRINT0120, "Interest Rate: "pLINEINPU 
T At: X-VAL ( At) : IF X<*0 OR X>40 THEN 70 

71 PRINT0160, "Number of Periods: " { : LINE 
INPUT At: N-VAL ( At) : IF N< 1 OR N>480 THEN 

71 

72 RETURN 

80 N-LOG(X) /LOG< i0) +1 

81 IF X >1E6 THEN N-N+l 

82 Ft-" t"+STRINGt<N, "#")+",.##": RETURN 
90 CLS: ON C 60T0 100,400,300,500,200,600 
,800,700 

100 PRINT012, "COMPOUND AMOUNT" 

110 60SUB 52 

120 F-P* < 1 + X ) A N: GOTO 63 

200 PRINT013, "PRESENT WORTH" 

210 GOSUB 53 

220 P-F* ( 1+X ) A (-N) : GOTO 62 
300 PRINT014, "SINKING FUND" 

310 60SUB 53 

320 A=F*<X/U1 + X) A N-1)): GOTO 64 
400 PRINT09, "SERIES COMPOUND AMOUNT" 

410 GOSUB 54 

420 F-A# ( < (1+X) A N-1)/X):G0T0 63 
500 PRINT012, "CAPITAL RECOVERY" 

510 GOSUB 52 

520 A«P*CX*<l+X) A N/< <1+X) A N-1) ) :BOTO 64 
600 PRINT010, "SERIES PRESENT WORTH" 

610 GOSUB 54 

620 P=A#(((1+X) A N-1)/(X*(1+X) A N)):GQT0 6 
2 

700 PRINT08, "GRADIENT UNIFORM SERIES" 

710 GOSUB 55 

720 A— G*<l/X— CN/ f <1+X) A N— 1) >):GOTO 65 
800 PRINT09, "GRADIENT PRESENT WORTH" 

810 GOSUB 55 

820 P-G/X* ( < (1+X) A N-1 ) /X-N)#(1/<1+X) A N): 
GOTO 62 

900 P*IR#40+IC: RETURN 
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Reviews 


Software 

BUSINESSPAK+ 

Totally Professional 
Package 

Last month we reviewed three excel- 
lent programs for the Model 100 from 
the Portable Computer Support Group. 
Six programs comprise a truly “profes- 
sional” package for business-oriented 
users called BUS1NESSPAK+. The first 
three programs were WRITE + , a print 
formatter, PUT + , a mini-database and 
SORT- f, a quick sorting routine. This 
month we will take a look at EXPNS+, 
GRAPH+and TELEX+. 

EXPNS+ 

As the name implies, EXPNS+ is a 
miniature version of Visi-Calc tailored 
for expense reports and small budgets. 
The limits of this spreadsheet are 18 
rows and 12 columns. Amounts up to 


$99,999.00 are accepted. Even H. L. 
Hunt can use this one. At the same time 
it is suggested if this figure is too small 
dropping three zeros would put you in 
the standard business reporting format. 
Five digits was more than adequate for 
my last five-day trip to Mehoppany, Pa. 

Two canned “shells” are provided for 
expenses and budgets. The user has full 
editing capability to name the rows and 
columns per his own wishes. After the 
main program and the “shell” are load- 
ed the screen is formatted with prompts 
for title information. Nine titles are 
accepted. After completing this formal- 
ity you are ready for the traveler’s 
nightmare, the actual data for your 
expenses. The thing that makes this 
program outstanding is that calcula- 
tions are made for you, and any input 
errors are remedied without heavy eras- 
ing. All you do is edit the column and 
the totals are updated. 

GRAPH+ 

Imagine the boss, or personnel man- 
ager, when he sees your next expense 


report complete with a pie chart. Now 
you know what GRAPH+ is all about. 
Using the data file you developed earlier 
in EXPNS+ you can now generate a pie, 
bar or line chart for any row or column 
of your spreadsheet. I prefer the pie 
chart format. A 3" circle is divided into 
up to 18 categories. Each division is 
listed both in a summary at the bottom 
of the page and adjacent to its portion of 
the chart. Very impressive, to say the 
least. Output is formatted for a DMP 
100 dot matrix printer. No mention is 
made of the adaptability of other print- 
ers. 

TELEX + 

Your Model 100 is also an electronic 
mailbox. With you can send a 

text file to any telex machine in the 
world or send an ECOM, electronic 
mailgram, to any mail address. Sending 
a Telex is very simple. After loading the 
program, and connecting your modem, 
you place the cursor over TELEX+, and 
as quick as you can say “Western U nion” 
a prompt appears asking “Which doc- 


Plot Against Your Competition! 

with QuickPlot® 

We’ve just given the CGP-115 Color 
Plotter business status. With Quick- 
Plot, your TRS-80 or IBM-PC can 
produce high quality line-, bar-, and 
pie-charts in vivid color. Simple data 
entry and flexible chart formatting 
makes QuickPlot and the CGP-115 
Color Plotter the logical choice for 
the professional who wants to plot 
his profits — not spend them. 


PCM 


CERTIFICATION 

SEAL 



Complete QuickPlot Package Model 11/12/16 $89 

Includes: Bar Chart, Pie Chart, Model 111/4 $89 

and Line Graph. Data and chart Model 100 $49 

formats save to disk for future IBM-PC/XT ! . $89 

plotting. 


Now you have a friend in the software business. 

2611 Windsor Forest Drive 
Louisville, KY 40272 
(502) 937-4311 


c o m p u i e rt 

ZDOLUTIOWS 


TRS-80 and CGP-115 are registered trademarks of Tandy Corporation. PC and 
PC/XT are registered trademarks of IBM Corporation. 


Call or write to place your order or send for free 
information. 
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The Rackseller 


ALABAMA 

Florence 

Madison 

ALASKA 

Fairbanks 

Kotzebue 

ARIZONA 

F>hoenix 

Scottsdale 
Tucson 
CALIFORNIA 
Atwater 
Citrus Heights 
Half Moon Bay 
North 
Hollywood 
.Sunnyvale 
CONNECTICUT 
Hartford 
DELAWARE 
Wilmington 
FLORIDA 
Ft, Lauderdale 
Miami 

Panama City 
Pensacola 
Tallahassee 
Winter Park 
GEORGIA 
Atlanta 
Columbus 
Trenton 
ILLINOIS 
Chicago 


Chicago 

Oakbrook 

INDIANA 

Elkhart 


Anderson News Co. 

Madison Books 

Electronic World 
Fairbanks News Agency 
Arctic Bookstore, Inc. 

Road Runner 
Computer Pro 
Softwareland Corp. 

Anderson News Co, 

Electro Brain 
Software Plus 
Strawflower Electronics 

Levity Distributors 
Computer Literacy 

The Aetna Life Club Store 

Normar Inc.— The Smoke Shop 

Software Connection 
Newsrack 

Computer Systems Group 
Anderson News Co. 

Anderson News Co. 

Independent Computer Systems 

Guild News Agency 
Muscogee News Co, 

The Phone Line 

Kroch's & Brentano's 
Jackson Street 
Kroch's & Brentano's 
Wabash Ave, 

Prairie News Agency 
Kroch's & Brentano's 

Elkhart City News & Book Store 


Indianapolis 

Madison 

Scottsburg 

KANSAS 

Topeka 

Wichita 

KENTUCKY 

Benton 

Pikeville 

LOUISIANA 

Slidell 

MAINE 

South Portland 

MASSACHUSETTS 

Littleton 

Marlboro 

Woburn 

MICHIGAN 

Novi 

NEBRASKA 

Lincoln 

NEVADA 

Las Vegas 
NEW HAMPSHIRE 

Manchester 
Peterborough 
West Lebanon 
NEW JERSEY 
Hackensack 
Midland Park 
Pennsville 
NEW MEXICO 
Albuquerque 
NEW YORK 
Johnson City 
New York City 
NORTH DAKOTA 
Fargo 
OHIO 
Cincinnati 
Lakewood 


A— Computer Store 
Arco Office Supplies 
Radio Shack of Scottsburg 

Town Criers of Topeka 
Palmer News Inc. 

Amateur Radio Equipment Co. 
Lloyd's Radio 

Anderson Electronics 
Gus-Stan Enterprises 

Radio Shack 

Portland News Co. 

Computer Plus 
Radio Shack 

Microcon Software Centers 

Ml Software Dist., Inc. 

Hobby Town 

Hurley Electronics 

Brookwrights 
Radio Shack 
Verham News Corp. 

Total Circulation Service 
Software City 

Dave's Electronic Radio Shack 

Page One Newsstand 

Unicorn Electronics 
Usercom System, Inc. 

Computer Associates 

Softwarehouse 

Lakewood International News 


Toledo 

OREGON 

Eugene 

Medford 

Portland 

Roseburg 

PENNSYLVANIA 

Pleasant Hills 

SOUTH CAROLINA 

Greenville 

North 

Charleston 

TENNESSEE 

Chattanooga 

Knoxville 

Memphis 

Nashville 

Smyrna 

TEXAS 

Austin 


Dallas 
Elgin 
Ft. Worth 

Irving 

WASHINGTON 

Blaine 

Richland 

Seattle 

WISCONSIN 

Appleton 

Janesville 

Portage 

CANADA 

ALBERTA 

Calgary 

Edmonton 

NOVA SCOTIA 

Halifax 

ONTARIO 

Hamilton 


Leo's 

Reitz Electronics, Inc. 

Libra Books, Inc. 

John's News Stand 
80-Plus 

Rainy Day Bookshop 

Pittsburgh Computer Store 
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Computer Center 
Mosko's Book Store 
Delker Electronics, Inc. 
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Capitol Micro Computers 
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RFI Electronics 
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Compulit Dist. 

C & J Electronics Computer Center 
Adams News 

Badger Periodicals 
Book World 
Sam's Electronics 


Rainbow Software Services 
Kelly's Software Distributors 

Atlantic News 

Galls Book World 


ument to send?” A preformatted Telex 
is then sent to any point in the world. 

Instructions are given for registration 
with Action Telex. A $ 1 50 per year fee is 
required to use this service but I’m sure 
it’s worthwhile if your business war- 
rants the use of Telex. Due to this fee I 
didn't try this feature, even though 
PSCG will give you a temporary code 
for up to three messages at no cost. 

Summary 

As I mentioned last month the docu- 
mentation is excellent. Step-by-step in- 
structions are supplied with several exam- 
ples for each program. A direct tele- 
phone number is given for general ques- 
tions. Or, better than that, send them a 
Telex! 

(Portable Computer Support Group, 
11035 Harry Hines Blvd., No. 207, 
Dallas, TX 75229, $89.95, includes 
manual and six cassettes) 

—Dan Downard 


Software 

Frankenstein Adventure 
Included In Game Pack 

Adventures are probably the most 
adaptable game applications for com- 
puters. Imagine yourself in a cemetery 
opening a secret note from Victor Fran- 
kenstein reading “As my last living rela- 
tive you are entrusted with a great mis- 
sion.” Sounds interesting already. 

Frankenstein Adventure is one of the 
four programs offered by SilverWare as 
part of a game package also containing 
Reversi, Blockade and Alexis Adven- 
ture. The games range in memory require- 
ments from 6.5K to 18.5K. If you haven't 
noticed, the amount of available mem- 
ory is listed below the BASIC sign-on 
message. Frankenstein Adventure re- 
quires 15K as it is a BASIC program and 


loaded using CLOAD. Instructions are 
included for storing the program in 
memory for quicker recall. 

Cemetery gates, mansions and tomb- 
stones seem to be the theme of this 
adventure. What would you expect from 
Frankenstein? Commands can be abbre- 
viated by the use of a single key such as 
“N” to go North. All input has to be in 
upper case. I played the game several 
times. Once I died in quicksand, while 
another time I was left wandering in a 
mansion looking for clues to the puzzle. 
The program gave adequate response to 
my input and was interesting to play. 
No graphics were encountered. 

1 would recommend Frankenstein Ad- 
venture to anyone who enjoys adven- 
ture games, and as a diverse addition to 
the game pack. Have fun — and please 
tell us what you find in the library. 

(Siverware, F.O. Box 21101, Santa 

Barbara, CA 93121, tape $24.95) 

— Pat Downard 
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on the TRS-80 Model 100 with 8K RAM 


SPECTRUM PROJECTS 

93-15 86th DRIVE 
WOODHAVEN, NY 11421 
(212) 441-2807 

Add $4 shipping and handling. N.Y. residents add sales tax. 

BBS #1 — (212) 441-3755 
BBS #2 — (212) 441-3766 
BBS #3 — (212) 441-5719 


CERTIFICATION 

SEAL 


Call our Bulletin Board for free Model 100 programs 

Now on line ...20 MEG. CORVUS HARD DISK DRIVE 


Model 100 Cables 

stock #26-3801 


CoCo to Model 100 Cables 


Model 100 8K Memory 

— $19.95 

^ A 

Upgrade Module 

CoCo to Model 1, II, III, IV 

\h /H 

$85 each 

— $24.95 


2 or more $80 each 

External 6 volt Battery 

T 


— $19.95 

For quick delivery call: 







Introducing the most logical place to store 
Elephant Memory Systems® (or lesser brands 
of aisks): The Trunk. 

With its alphabetized library index, you can 
file or retrieve up to 60 disks, instantly 
The Trunk is made of durable molded 
plastic with a hinged, one-piece lid, to keep 
disks safe from dust, dirt, and other detriments 
which disks despise. 


And, it’s portable. Because the lid doubles 
as a carrying handle so your Elephant Memory 
Systems® disks can go anywhere you do. 

There’s a model for 5VT and 8" floppies, as 
well as a cassette-and-game file and a special 
Atari® version. 

So if you’re looking for the best disk storage 
system on the market . . . 

The Trunk is an open-and-shut case. 


THE TRUNK. ENDORSED DY ELEPHANTS. 


Elephant Memory Systems® Disks 

A full line of top-quality floppies, in virtually every 5%" and 8 " model for compatibility with virtually every computer on the market . 
Guaranteed to meet or exceed every industry standard, certfied 100% error-free and problem-free, and to maintain its quality for at least 

12 million passes (or over a life-time of heavy-duty use). 

Marketed exclusively by Leading Edge Products, Information Systems and Supplies Division 
55 Providence Highway, Norwood, MA 02062. Dealers: call toll-free 1-800-343-8413- 
or in Massachusetts, call collect (617) 769-8150, Telex 951-624 



